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SECTION I 
INTRODUCTION AND DESCRIPTION 



1-1. INTRODUCTION. 

1-2. Interface Kit 1253 IB provides for bit-parallel 
transfer of data between the Computer and interface 
card, while transfer between the interface card and 
the Teleprinter isbit-serial. This is a single address 
I/O card, simultaneous input and output is not pos- 
sible. The kit consists of the following: 

a. Buffered Teleprinter Interface Card (HP Part 
No. 12531-6001 or 02116-6168). 

b. BCS Teleprinter Driver Tape (HP Accessory 
No. 20017). 

c. SIO 4K Teleprinter Driver Tape (HP Accessory 
No. 20322) or SIO 8K Teleprinter Driver Tape (HP 
Accessory No. 20323). 

d. HP 2116 Buffered Teleprinter Test-Binary 
Tape (HP Accessory No. 20417). 

e. HP 2115/2114 Buffered Teleprinter Test- 
Binary Tape (HP Accessory No. 20420). 

NOTE 

Each tape has a suffix letter after the 
HP Accessory Number. This suffix 
letter is subject to change depending on 
the supplied version of the tape. 

1-3. Sections II through IV provide installation, 
programming, and theory of operation for the Buffered 
Teleprinter Interface Card and Teleprinter operation 
information. A supplement to this manual contains a 
description of the diagnostic program contained on the 
Buffered Teleprinter Test- Binary Tape. 

1-4. DESCRIPTION. 

1-5. The Buffered Teleprinter Interface Card plugs 
into any of the interface- card I/O slots of the Com- 
puter. The card contains control and interrupt logic 
for both input and output Computer functions, and 
eight flip-flops for temporary storage of data. This 
data is entered into the Computer or transferred to the 



Teleprinter through the Buffered Teleprinter Interface 
Card. Eight data bits are transferred between the 
Computer and interface card in parallel and converted 
by the card to 11-bit ASCII for transfer between the 
Teleprinter and interface card in bit- serial (one bit at 
a time). The least- significant 8-bits of the A or B 
Register are sent via the I/O Bus Out (IOBO) to the 
interface card and then to the Teleprinter during output 
operations. During input operations, a character from 
the Teleprinter enters the Buffered Teleprinter Card 
in bit -serial and from the card to the Computer in 
parallel (8-bits at a time). During output operations 
8-bits are transferred from the Computer to the inter- 
face card in parallel and from the interface card to 
the Teleprinter in bit-serial. This card can provide 
automatic readback from keyboard or paper tape to 
the Teleprinter without Computer intervention. 

1-6. TELEPRINTER DRIVER TAPES . 

1-7. BCS TELEPRINTER DRIVER TAPE. The 
BCS (Basic Control System) Teleprinter Driver Tape 
is a flexible Input/Output routine which permits trans- 
fer of data between the Computer and the Teleprinter. 
The driver is accessed through the BCS I/O Control 
subroutine (. IOC.) by a 5-word calling sequence. The 
driver is made part of the Basic Control System 
through the use of the Prepare Control System routine 
which is furnished with each Computer. Refer to 
Chapter 1 of the HP Computer Basic Control System 
manual for information on Input/Output programming 
and to Chapter 4 for information on the processing of 
the BCS Teleprinter Driver Tape. 

1-8. SIO TELEPRINTER DRIVER. The SIO (Sys- 
tem Input/Output) Teleprinter Driver (4K or 8K, de- 
pending on Computer memory size) is a simple, 
unbuffered Input/Output routine used by standard 
software systems (FORTRAN, Assembler, etc. ) to 
permit transfer of data between the Computer and the 
Teleprinter. The driver is incorporated into the sys- 
tem through the use of the SIO Dump Routine furnished 
with eachComputer. Thedriver may alsobe accessed 
directly by a 3 -word calling sequence in the user's 
program. Refer to Appendix F of the HP Computer 
Assembler manual for detailed programming and use 
information for the SIO Teleprinter Driver Tape. 
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1-9. HP 2752A TELEPRINTER . 

1-10. The HP 27 52 A Teleprinter (Figure 1-1) is an 
HP-modified Teletype Model ASR33-TC Teletype- 
writer set and is recommended for applications 
requiring operation which does not exceed five hours 
per day or 30 hours per week. The unit is made up of 
a typewriter, a tape punch, and a tape reader as a 
single unit. It is furnished with its own floor stand 
and is usually placed in a location adjacent to the 
Computer. The following specifications apply to the 
HP 2752A Teleprinter: 

a. Reading and Punching Speed: 10 characters 
per second. 

b. Typing Speed: 100 words per minute. 

c. Data Transfer: bit-serial, 8-bit code. 

d. Ambient Temperature: 10°C to 40°C (50°F to 
104°F). 

e. Relative Humidity: 20% to 80%. 

f. Power Requirements: 115 vac ±10 percent, 
60 ±0. 45 Hz or 50 ±0. 12 Hz, single phase, 230 watts. 




g. Tape Handling Capabilities: 8-channel, 1-inch 
wide paper tape. 

h. Dimensions and Weight (including stand): 

Height: 33 inches (838 mm) 

Width: 25-1/2 inches (648 mm) 

Depth: 18-1/2 inches (470 mm) 

Weight: 77 pounds (34, 7 kg) 



1-11. HP 2754A/B TELEPRINTER . 

1-12. The HP 2754A/B Teleprinter (Figure 1-2) is 
an HP-modified Teletype Model ASR35-AR Teletype- 
writer Set and is recommended for heavy-use appli- 
cations where operation exceeds five hours per day 
or 30 hours per week. It is made up of a typewriter, 
a tape punch, and a tape reader as a single unit. It is 
furnished with its own floor stand and is usually placed 
in a location adjacent to the Computer. The following 
specifications apply to the HP 2754A/B Teleprinter: 

a. Reading and Punching Speed: 10 characters 
per second. 

b. Typing Speed: 100 words per minute. 

c. Data Transfer: bit-serial, 8 -bit code. 

d. Ambient Temperature: 10°C to 40°C (50°F to 
104°F). 

e. Relative Humidity: 20% to 80%. 

f. Power Requirements: 115 vac ±10 percent, 
60 ±0. 5 Hz, single phase, 350 watts. (Consult factory 
if 50 Hz operation is desired. ) 

g. Tape Handling Capabilities: 8-channel, 1 -inch 
wide paper tape. 

h. Dimensions and Weight (including stand): 

Height: 33-1/2 inches (851 mm) 

Width: 40 inches (1016 mm) 

Depth: 24 inches (610 mm) 

Weight: 225 pounds (102 kg) 



NOTE 

When using the 2754A/B Teleprinter, 
the computer program can individually 
select the teleprinter tape punch, 
printer or both output devices simul- 
taneously. 



1-13. DATA PHONE . 

1-14. This board used in this kit may also be used 
as an I/O Data Phone Interface card, providing ASCII 
formatted characters are to be used. When using a 
Data Phone, make the following connections on the 
48-pin connector plug: 

a. Connect pin Y to pins 4 and D. 

b. Connect pin V to pins 16 and T. 



Figure 1-1. HP 2752A Teleprinter 



1-15. Refer to the Data Phone Interface 
12563A for a more detailed description. 



manual 




Figure 1-2. HP 2754A/B Teleprinter 



SECTION II 
INSTALLATION AND PROGRAMMING 



2-1. 



INSTALLATION. 



2-2. Refer to the HP 2752A, HP 2754A, or HP 2754B 
Teleprinter manuals for unpacking, installation, and 
checkout instructions of the applicable Teleprinter 
unit. To connect the Teleprinter to the Buffered Tele- 
printer Interface Card using the cable which is an in- 
tegral part of the Teleprinter, perform the following: 

a. Turn power off. 

b. Open the Computer for access to the I/O cards. 

c. Plug the Buffered Teleprinter Interface Card 
into the I/O slot assigned for the particular Computer 

System. 

d. Pass the cable connector from the Teleprinter, 
marked TELEPRINTER, through the computer opening 
and to the front of the card. Slide the connector onto 
the Buffered Teleprinter Interface Card. 

e. Close the cover of the Computer. 

2-3. After the Teleprinter has been connected to 
the Computer, run the Teleprinter diagnostic program 
described in supplement. If the diagnostic program is 
completed without error, the system operates 
properly. Refer to Tables 2-1 and 2-2 for leadwire 
connections between the interface card and the HP 
2752A and 2754A/B Teleprinters, respectively. 

2-4. TELEPRINTER OPERATION. 



2-5. 



MAIN CONTROL. 



2-6. Plug the Teleprinter power cable into the ap- 
propriate power source. Operation of the Teleprinter 
is started and stopped by the LINE/OFF/LOCAL 
switch on the front panel of the HP2752A Teleprinter, 
and by the ON LINE/OFF/LOC. switch on the front 
panel of the HP 2754A/B Teleprinter. Operation of 
these switches are as follows: 

a. In the OFF position, the motor in the Tele- 
printer is turned off, preventing its operation. 

b. In the LINE position (2752A) or ON LINE posi- 
tion (2754A/B) the Teleprinter is in a full-duplex 
configuration. This configuration, and the Computer 
programming subroutines, permit the following types 
of operation: 

1. Transmit data to the Computer manually 
from the typewriter keyboard while making 
a printed-page copy. The data can also be 
punched into tape simultaneously. 

2. Receive data from the Computer and pro- 
vide a printed-page copy. The data can 
also be punched into tape simultaneously. 

3. Transmit data to the Computer from the 
tape reader while making a printed-page 
copy. The data transmitted can also be 
punched into tape simultaneously. 



c. In the LOCAL position (2752A) or LOC. posi- 
tion (2754A/B) data cannot be entered into the Com- 
puter from the Teleprinter but the following types of 
operation can be performed: 

1. Punch data into tape from the typewriter 
keyboard while making a printed-page 
copy. 

2. Punch data into tape from the tape reader 
while making a printed-page copy. 

3. Make a printed-page copy of data from the 
tape reader or the keyboard. 



2-7. 



TAPE READER. 



2-8. The tape reader START/STOP/FREE switch 
performs the following functions: 

a. Pressing the START switch when the HP 2752A 
Teleprinter LINE/OFF/LOCAL switch or HP 2754A/B 
ON LINE/OFF/LOC. switch is in the LOCAL or LOC. 
position energizes the tape reader trip coil and the 
tape reader starts reading the tape. If the switch is 
in the LINE or ON LINE position, the tape reader 
trip coil will not energize until a Read Command is 
issued by the Computer program. When it is issued, 
the coil energizes and the tape reader starts reading 
tape. (See Figure 2-1 for a simplified diagram of the 
switching circuits. ) 

b. Pressing the STOP switch prevents the tape 
reader from reading tape. 

c. Pressing the FREE switch releases the feed 
ratchet of the tape reader permitting the tape under 
the plastic tape lid to move easily for positioning 
purposes. 

2-9. TAPE P UNC H (HP 2752A TELEPRINTER 
ONLY . 

2-10. The tape punch ON/OFF/REL. /B. SP. switch 
on the 2752A Teleprinter performs the following 
functions: 

a. Pressing the ON switch engages the drive 
mechanism in the punch through mechanical action. 
This permits a punching operation on receipt of data 
from the Computer or the typewriter keyboard. 

b. Pressing the OFF switch releases the drive 
mechanism in the punch, preventing its operation. 

c. Pressing theREL. (Release) switch disengages 
the tape-guide assembly from the feed wheel in the 
punch, allowing easy removal of tape. 

d. Pressing the B. SP. (Back space) switch back- 
spaces the tape one feed hole each time it is pressed. 



Table 2-1. Interface Card-to-2752A Teleprinter Leadwire Connections 



INTERFACE CARD 
CONNECTOR PIN 


LEADWIRE 
COLOR CODE 


TELEPRINTER 
CONNECTION 


SIGNAL 


4,D 


Black 


Pin 3 of Teleprinter rear 
connector 


Input Data Bit 


12, N 


Red 


+12-volt input on *Card Assy 
(one end of resistor Rl) 


+12 volts 


14, R 


White - 
Brown 


-12-volt input on Card Assy 
(one end of resistor R3) 


-12 volts 


16, T 


Green- 
Orange 


Pin 7 of Teleprinter rear 

connector 


Output Data Bit 


13, P 


Yellow 


Input to Card Assy (junction 
of resistors Rl and R2) 


Read Command 


24, BB 


Cable 
Shield 


Gnd connection on Card Assy 
(emitter of transistor Q2) 


Ground 


NOTES: 




1. Pins 4 & D, 12 & N, 13 & P, 14 & R, 16 & T, and 24 & BB are connected together on 
Interface Card Connector. 


* Card Assy refers to the Printed Circuit Card Assembly added during modification of 
the Teletype Model ASR33. Refer to the Schematic Diagram in the HP 2752A Tele- 
printer manual for components specified in this Table. 



Table 2-2. Interface Card-to-2754A/B Teleprinter Leadwire Connections 



INTERFACE CARD 
CONNECTOR PIN 


LEADWIRE 
COLOR CODE 


TELEPRINTER 
CONNECTION 


SIGNAL 


4,D 


Black: 


Terminal T6 


Input Data Bit 


12, N 


Red 


+12-volt input on *Card Assy 
(one end of resistor Rl) 


+12 volts 


14, R 


Brown 


-12-volt input on Card Assy 
(one end of resistor R3) 


-12 volts 


16, T 


White 


Terminal T7 


Output Data Bit 


13, P 


Yellow 


Input to Card Assy (junction 
of resistors Rl and R2) 


Read Command Signal 


24, BB 


White 
Black and 
Cable 
Shield 


Gnd connection on Card Assy 
(emitter of transistor Q2) 


Ground 


6,F 


Orange 


Terminal T8 


Punch Control 


8, J 


Green 


Terminal T4 


Print Control 


NOTES: 


1. Pins 4 & D, 12 & N, 13 & P, 14 & R, 16 & T, and 24 & BB are connected together on 
the Interface Card Connector. 


* Card Assy refers to the Printed Circuit Card Assembly added during modification of 
the Teletype Model ASR35. Refer to the Schematic Diagram in the HP2754A/B Tele- 
printer manual for components specified in this Table. 
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Figure 2-1. Teleprinter Tape Reader Switching 
Circuit, Simplified Diagram 



2-11. MODE SWITCH (HP 2754A/B TELEPRINTER 
ONLY . 

2-12. Although the MODE switch on the 2754A/B 
Teleprinter contains positions K, KT, T, TTS, and 
TTR, only positions K, KT, and T can be used. Posi- 
tions TTS and TTRare mechanically locked out. When 
the Teleprinter ON LINE/OFF/LOC. switch is in the 
LOC. position, the K, KT, and T positions of the 
MODE switch perform the following functions: 

a. In the K and KT positions, printed-page copy 
is typed from either the typewriter keyboard or the 
tape reader. 

b. In the T position, data is punched into tape 
from either the typewriter keyboard or the tape reader 
while a printed-page copy is being typed. 

2-13. During output operations, with the Teleprinter 
ON LINE/OFF/LOC. switch in the ON LINE position, 
the K, KT, and T positions of the MODE switch per- 
form the following functions: 

a. In the K position, a printed-page copy of the 
Computer ASCII output is generated. The tape punch 
if off, therefore no punch output can take place even 
if punch is programmed. 

b. In the KT position, a printed-page copy of the 
Computer ASCII output or a punched tape of the Com- 
puter binary output is generated. Standard BCS/IOC 
software restricts the output to one function. Both 
functions cannot be performed simultaneously. The 
user may write his own driver software that will do 
both. 

c. In the T position all output data is printed and 
punched without regard to format content. 

2-14. During input operations, with the Teleprinter 
ON LINE/OFF/LOC. switch in the ON LINE position, 
the K, KT, and T positions of the MODE switch per- 
form the same functions as output operations if simul- 
taneous output is programmed as in the keyboard 
function. The keyboard function can be accomplished 
from the tape reader if the tape is inserted in the 
reader and the switch set to RUN. 



2-15. PROGRAMMING. 

2-16. The HP standard software facilities may be 
used to input data using the 2752A or 2754A/B Tele- 
printer. The Basic Control System (BCS) includes an 
Input/Output control subroutine which requires only a 
simple calling sequence to transfer data between the 
Computer and the Teleprinter. Refer to Section I, 
Paragraphs 1-6, 1-7, and 1-8, for programming 
information using BCS. 

2-17. A subroutine may be programmed to perform 
all necessary operations to input data from the Tele- 
printer and output data to the Teleprinter. Tables 2-3 
through 2-7 illustrate the operations required to input 
and output data. The Wait for Flag Method (Skip on 
Flag Set) is used to signal the Computer that a char- 
acter is available to the Computer or that a character 
was sent to the Teleprinter. 

2-18. The programmer must output a function select 
code to the Buffered Teleprinter Interface Card before 
any I/O operation is started. The coding shown in 
Table 2-3 is the minimum required to input or output 
one character. 



Table 2-3. Program Constants 



LABEL 


OPCODE 


OPERAND 


REMARKS 


TTY 


EQU 


nn 


WHERE nn IS THE SELECT CODE 


DOPU 


OCT 


110000 


DATA OUT PUNCH ONLY 


DOPR 


OCT 


120000 


DATA OUT PRINT ONLY 


DOPP 


OCT 


130000 


♦DATA OUT PRINT AND PUNCH 


DINP 


OCT 


140000 


DATA IN, NO PRINT, NO PUNCH 


DINPU 


OCT 


150000 


•DATA IN AND PUNCH 


DINPR 


OCT 


160000 


DATA IN AND PRINT 


DINPP 


OCT 


170000 


•DATA IN, PRINT AND PUNCH 


CHAR1 


OCT 


000000 


TEMPORARY DATA 


CHAR2 


OCT 


000000 


STORAGE LOCATIONS 


« 


FUNCTIONS NOT USED IN HP STANDARD SOFTWARE. 



2-19. SAMPLE PROGRAMS . 

2-20. Refer to the following tables for sample 
programs: 

a. Table 2-4, Status Check 

b. Table 2-5, Input Program 

c. Table 2-6, Input Subroutine 

d. Table 2-7, Output Program 

e. Table 2-8, Output Subroutine 





Table 2-4 


. Status Check 


OP CODE 


OPERAND 


REMARKS 


LIA 


SC 


PUT BUFFERED DATA INTO A REG 


SSA 




BUSY? 


JMP 


*-2 


YES, REPEAT LOOP 


— 




NO, PROGRAM CONTINUATION 



6 



Table 2-5. Input Program 



OP CODE 


OPERAND 


REMARKS 


CLF 





INHIBIT INTERRUPT 




LDA 


DXXXX 


LOAD "A" WITH I/O FUNCTION 




OTA 


TTY 


OUTPUT A READ (DATA IN) 
FUNCTION TO I/O BOARD 




JSB 


CHRIN 


GET A CHARACTER 




STA 


CHAR 1 


RETURN WITH CHARACTER IN 
REGISTER 


'A" 


JSB 


CHR IN 


GET A CHARACTER 




STA 


CHAR2 


RETURN WITH CHARACTER IN 
REGISTER "A" 





Table 2-6. Input Subroutine 



LABEL 


OP CODE 


OPERAND 


REMARKS 


tCHRIN 


NOP 








STC 


TTY.C 


START THE TTY 




SFS 


TTY 


IS THE FLAG SET? 




JMP 


*-1 


NO, STAY IN LOOP 




LIA 


TTY 


YES, GET CHARACTER 




JMP 


CHRIN, I 


AND EXIT 


tCHARACTER INPUT SUBROUTINE Wl LL READ 
AND EXIT WITH ONE CHARACTER IN "A" 



Table 2-7. Output Program 



OP CODE 


OPERAND 


REMARKS 


LDA 


DXXXX 


LOAD "A" WITH I/O FUNCTION 


OTA 


TTY 


OUTPUT A WRITE (DATA OUT) 
FUNCTION TO I/O BOARD 


LDA 


CHAR1 


LOAD "A" WITH CHARACTER 
TO BE OUTPUT 


JSB 


CHROT 


OUTPUT A CHARACTER 


LDA 


CHAR2 


LOAD "A" WITH CHARACTER 
TO BE OUTPUT 


JSB 


CHROT 


OUTPUT A CHARACTER 



Table 2-8. Output Subroutine 



LABEL 


OPCODE 


OPERAND 


REMARKS 


tCHROT 


NOP 








AND 


M377 


STRIP OFF ANY EXTRANEOJUS BITS 




OTA 


TTY 


OUTPUT DATA 




STC 


TTY.C 


START THE TTY 




SFS 


TTY 


IS THE FLAG SET? 




JMP 


*-1 


NO, STAY IN LOOP 




JMP 


CHROT.I 


YES, EXIT 


M377 


OCT 


377 




tCHARACTER OUTPUT SUBROUTINE WILL OUTPUT ONE 
CHARACTER FROM THE 8 LEAST SIGNIFICANT BITS OF 
REGISTER "A" AND EXIT 



SECTION III 
THEORY OF OPERATION 



3-1. GENERAL THEORY OF OPERATION. 



3-2. 



DATA CODES. 



3-3. The typewriter portion of the Teleprinter must 
receive data in ASCII (American Standard Code for 
Information Interchange) code for it to type readable 
information. The tape punch will punch whichever 
code (binary, ASCII, etc. ) the Teleprinter receives. 
However, if the punch is punching data received in a 
code other than ASCII, the typed copy from the type- 
writer (which may be typing simultaneously) will not 
be readable. Refer to the Operating Manual, HP 
Character Set for the ASCII-code character set. Note 
that only seven bits are shown used in the code. 
Whether bit 8 is a logic "one" or "zero" during input 
operations depends on the parity functions of the par- 
ticular Teleprinter being used. When reading ASCII 
coded tapes, programming masks the eighth bit be- 
fore placing the data in memory so the logic level of 
the eighth bit is immaterial. During output operations 
using ASCII code, standard HP software supplied with 
the Computer automatically sets bit 8 to alogic "one". 

3-4. CHARACTER LENGTH . 

3-5. Teleprinter design requires that a total of 11 
bits of information be transferred between the Com- 
puter and the Teleprinter for each character trans- 
ferred. The bits are transferred one at a time so the 
basic data unit is a bit. Figure 3-1 depicts a simpli- 
fied block diagram of data transfer. Of the 11 bits, 
eight are character bits and three are start and stop 
bits. These bits are shown as follows: 

Bit Transferred 12345678 9 10 
\ „ '<—s— / 



Start Character Stop 
Bit Bits Bits 



bit serial 

U-BITS v 








HP 2752A 
HP 2754A/B 
TELEPRINTER 


1 \ mr 


BUFFERED 

INTERFACE 

CARD 




COMPUTER 


\ 


A 


** 


\ i 








a -i 


ALLEL 

9/rs 



3-6. 



Figure 3-1. Data Transfer Simplified 
Block Diagram 



INPUT OPERATIONS. 



3-7. With the Teleprinter LINE /OFF/LOCAL switch 
in the LINE position, an input operation can be pro- 
vided from the Teleprinter in one of two ways. 



a. The input can be provided manually from the 
Teleprinter keyboard. 

b. The input canbe provided from the tape reader 
of the Teleprinter. 

3-8. When a typewriter key is pressed or the tape 
reader starts reading tape, a Teleprinter timing cycle 
is started. This timing cycle establishes a bit trans- 
fer rate of 110 bits per second or a maximum charac- 
ter transfer rate of 10 characters (including start and 
stop bits) per second. Thus, a bit is transferred to 
the Interface card every 9.09 milliseconds. The first 
bit from the Teleprinter (the start bit) initiates the 
interface card timing circuits so that Computer and 
Teleprinter timing is in synchronization. After a 
character is transferred to the interface card, Tele- 
printer timing stops and must be reinitiated to transfer 
another character. Refer to Figure 3-2 for the signals 
sent to the Computer for the letter "M" from the tape 
reader or the typewriter keyboard. In TTY terminol- 
ogy a "1" is a mark and a "0" is a space. 



ALWAY! 














pd'or'Y'l ALWAYS 




"o" 












i_. i X— J 


BITS 


I 

I \ 


2 


3 


4 


5 


6 


7 I 8 I 9 MO ] 


li .11 
















ill: 


1 
il-n 


START 

BIT 








t I 

| STOf?fl»S s l 



j 909 L 



DATA BITS 



Figure 3-2. Data Bits for Transfer of 

Letter "M" 

3-9. An input operation is enabled by transferring 
bits 14 and 15 true to the Interface card which sets the 
IN OUT flip-flop to the IN state. If printing data as it 
is input ;s desired, bit 13 of the control word will also 
have to be set. Pressing the PRESET pushbutton does 
the same thing. An input operation is initiated by a 
Set Control, Clear Flag (STCnn, C) instruction to the 
interface card for inputs from either the Teleprinter 
tyepwriter keyboard or tape reader. The STC portion 
of the instruction causes a Read Command signal to be 
issued to the Teleprinter when the tape reader is to 
provide input data. If the typewriter is to be used to 
input data to the Computer, the tape reader STOP 
switch is engaged, and the Read Command signal has 
no effect on the Tape Reader. The STC portion of the 
instruction also sets the interface card Control Flip- 
Flop which enables incoming data bits and Flag signals. 
The CLF portion of the instruction resets the Flag 
Buffer and Flag Flip- Flops on the interface card to 
prevent an interrupt signal from being sent to the 
Computer before data is received from the Teleprinter. 

3-10. An LIA or LIB instruction generates an IOI 
signal to enable parallel transfer of the eight possible 
data bits representing the character read to the eight 
least-significant bit positions (bits 0-7) of the A or B 



a 



register. To put two characters in the A or B register, 
and then into a memory location, rotate instructions, 
ALF or BLF, are used (twice) to rotate the first eight 
bits into the most-significant bit positions (8 through 
15) of the register. An MIA or MIB instruction is then 
used to transfer the second eight bits from the inter- 
face card to the A or B register. An LIA or LIB in- 
struction cannot be used for second-character trans- 
fer since these instructions destroy the contents of 
the register prior to entering data. 

3-11. The set or reset condition of the Flag flip-flop 
may be tested with a Skip on Flag Set (SFS) or a Skip 
on Flag Clear (SFC) instruction to determine when a 
character is available to the Computer from the Tele- 
printer. When using this method, the Interrupt System 
Enable flip-flop on the I/O Control card must be reset 
with a Clear Flag (CLF) instruction and a Select Code 
of 00 (octal). 

3-12. OUTPUT OPERATIONS . 

3-13. An output operation is enabled by transferring 
the desired command bits 12, 13 and 15 to the Interface 
card. This clears the IN/OUT flip-flop and sets the 
print or punch functions. An output from A (OTA) or 
an output from B (OTB) instruction must be issued by 
the Computer program to output 8-bits of data from 
the eight least-significant bit positions (0-7) of the A 
or B register to the interface card. The IOO signal 
which resulted from the OTA/B instruction enables 
the bits from the A or B register to set the applicable 
Bit 1 through Bit 8 flip-flops on the interface card. 

3-14. Before data transfer to the Teleprinter, the 
buffered interface card maintains a positive voltage 
on the input to the Teleprinter. The Computer pro- 
gram initiates an output operation with a STC nn, C 
command and the first bit to the Teleprinter must be 
a logic "zero" signal (the start bit). This bit initiates 
the Teleprinter timing cycle which requires a bit from 
the Interface card every 9. 09 milliseconds until the 
11 bits representing the character (including start and 
stop bits) are received. The timing circuit on the 
interface card is also initiated to maintain Computer- 
Teleprinter timing synchronization. After a character 
is transferred, Teleprinter timing stops and the In- 
terface card must be reinitiated by another STC nn, C 
command from the Computer for the next character 
transfer. 



3-15. DETAILED THEORY OF OPERATION. 

3-16. GENERAL . 

3-17. Figure 3-5 depicts the logic diagram for the 
Buffered Teleprinter Interface Card. For leadwire 
connections between the interface card and applicable 
Teleprinter, refer to Figure 3-5 and Tables 2-1 or 
2-2. Figure 3-6 depicts the parts location of the 
Buffered Teleprinter Card. 

3-18. Logic diagram reference designations preceded 
by MC are identified by part number in Section IV and 
the logic diagram for each Microcircuit Package is 
shown in Figure 3-7. 



3-19. COMPUTER POWER ON . 

3-20. When power is initially applied by the POWER 
switch, on the front panel of the Computer, the POPIO 
and CRS signals are received simultaneously by the 
interface card from the I/O Control card. These sig- 
nals establish initial conditions for operation of the 
interface card. The POPIO signal is applied to "nand" 
gate MC16A. All inputs to the "nand" gate are then 
true and its false output sets the Flag Buffer Flip-Flop 
(the input to the flip-flop is inverted). At time T2, the 
ENF signal from the I/O Control card enables "nand" 
gate MC56B. The output from gate MC56B resets the 
IRQ flip-flop. The output from gate MC56B is also 
transferred through "nand" gate MC56D and with the 
output of the Flag Buffer flip-flop, sets the Flag flip- 
flop and changes the state of the Counter Reset flip-flop. 

3-21. When power is first applied, the positive pulse 
of the Control Reset (CRS) signal is received at pin 13 
and inverted by "nand" gate MC66A. The output from 
this gate resets the Control flip-flop, Clock Enable 
flip-flop and Read flip-flop. This signal also directly 
resets the Print flip-flop, Punch flip-flop, directly 
sets the IN/OUT flip-flop to IN, and resets the Divider 
network through "nand" gates MC94D and MC84A. 
Therefore the card is always in the Input state after 
turn on or whenever PRESET is pressed. 

3-22. OUTPUT LOGIC . 

3-23. INITIAL CONDITIONS. To output data from 
the Buffered Teleprinter Card the following assump- 
tions are made: 

a. The Teleprinter used is an HP 2754A/B Tele- 
printer. This model is identical to the HP 2752A 
Teleprinter with the following exceptions: 

1. Computer control of punching and printing 
is not available with the HP 2752A Tele- 
printer. 

2. Manual control of punching output data and 
printing of all output to the HP 2752A 
Teleprinter. 

b. The Flag Buffer and Flag flip-flops are set by 
the POPIO pulse when power is initially applied to the 
Computer or when PRESET is pressed. 



c. 
state. 



The IRQ and Control flip-flops are in the reset 



d. A positive voltage is supplied through pins 16 
and T of the interface card to the data line of the 
Teleprinter. 

e. The Teleprinter control switch is ON LINE. 

f. The Teleprinter MODE switch is in theKT po- 
sition for Computer control of output data formatting. 

3-24. PROGRAM CONTROL OF PUNCH AND 
PRINT. Before data is output to the Buffered Tele- 
printer Card, a control word must be output to select 
the punch or print or both. When bit 13 of the control 
word is true, the Teleprinter will print. When bit 12 
of the control word is true, the Teleprinter will punch 
output data. Bit 15 is set true to inform the card that 
the word is a control word and not a data word. 
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3-25. To print but not punch data, the control word 
would be 120000. An OTA or OTB instruction with the 
select code of the interface card location will output 
the word. When this instruction is executed, IOO 
comes true at time T3,T4. This signal is input to 
"nand" gate MC36C and with the output from the Select 
Code gate MC46A pin 3, enables "nand" gate MC54A. 
The IOBO 15 signal is input through pin 74 (86 -pin 
connector) to pin 10 of "nand" gate MC55D. The other 
input to this "nand" gate is the T3 Buffered signal. 
Gate MC55D is enabled generating a clock pulse at 
output pin 8. This clock strobes the In/Out flip-flop, 
MC124A, to a false state since IOBO 14 is false. The 
clock pulse also strobes the Print flip-flop, MC114B, 
to the true state since IOBO 13 is true, and strobes 
the Punch flip-flop MC114A to the false state because 
IOBO 12 is false. The In/Out flip-flop, MC124A, is 
now in the reset condition or output state. Print flip- 
flop, MC114B, is set true which turns transistor Q6 
off. (This transistor shorts the print circuit in the 
Teleprinter when it is on.) Punch flip-flop MC114A 
is false, which turns transistor Q7 on shorting the 
punch circuit in the Teleprinter. Therefore, the Tele- 
printer will print the output data but will not punch it. 

3-26. The data character to be printed on the Tele- 
printer is output to the interface card from the eight 
least-significant bits of the A or B Register. This is 
accomplished by using the OTA or OTB instruction 
with the select code of the interface card location. 
The eight most-significant bits must be zero. The 
IOO signal comes true at time T3,T4. This signal is 
input to "nand" gate MC36C and with the output from 
the Select Code gate MC46A pin 3, enables "nand" 
gate MC54A. The positive-going output from this gate 
is transferred as one input to "nand" gates MC86A, 
MC86B, MC86C, MC86D, MC76A, MC76B, MC76C, 
and MC76D. The Data Register is reset by the output 
signal from MC54B pin 8, except flip-flop MC124B 
which is directly set by the signal at time T3. The 
condition of the IOBO lines through 7 are now directly 
set into the 8-bit Data Register flip-flops MC95A, 
MC95B, MC105A, MC105B, MC115A, MC115B, MC 
125A, and MC125B. Data is stored in the register 
flip-flops during time T4. Flip-flop MC85A is held 
in the (false) state and flip-flop MC85B is held in the 
1 (true) state by the false Clock Enable signal. 

3-27. The Data Register consists of 11 flip-flops. 
These flip-flops store input data on the positive-going 
edge of the clock signal and can be directly set or re- 
set. Now that the character is stored in the Data 
Register, a STC,C instruction is issued to the inter- 
face card with the select code of the location of the 
card. 

3-28. The STC signal is input on pin 22 and trans- 
ferred through "nand" gate MC36B (see Figure 3-3). 
The output signal on pin 6 of MC36B sets the Control 
flip-flop. With the use of the skip flag set method of 
input/output control, the Control flip-flop has no ef- 
fect as the signal is only used to enable the interrupt 
circuits on the card. The interrupt system should 
have been turned off by a CLF instruction to I/O loca- 
tion 00. The STC signal is also sent to "nand" gate 
MC104B. Since the In/Out flip-flop is in the Out state, 
"nand" gate MC34D is enabled. The output from this 



gate sets the Clock Enable flip-flop. The Clock Enable 
flip-flop had been reset by the CRS signal (from power 
turn-on or PRESET) or had been reset at the end of 
the last character, and has held the Data Register 
flip-flop MC85A in the reset state and flip-flop MC85B 
in the set state. Flip-flop MC85B kept "nand" gate 
MC24Cat a state such that transistor Q4 has been held 
in the off position. When Q4 is in the off position, +12 
volts is applied to the Teleprinter through R12 and 
CRl keeping the Teleprinter in a true or mark state 
(normally on, dormant condition). Once the Clock 
Enable flip-flop has been set, "nand" gate MC55A is 
enabled and the 872 Hz oscillator pulses are trans- 
ferred through "nand" gate MC55C to the A,B,C di- 
vider network flip-flop MC64A. This network divides 
the 872 Hz signal down to 109 Hz (slightly lower than 
the maximum rate of the Teleprinter). The period of 
109 Hz is 9. 09 milliseconds. The CLF signal enters 
through "nand" gate MC16C resetting the Flag Buffer 
flip-flop and Flag flip-flop. 

3-29. Pin 9 of the C flip-flop (MC74B) goes false and 
pin 8 goes true 9. 09 milliseconds after the Clock 
Enable flip-flop was set. For this period of one pulse, 
the true signal (mark condition) has been held on by 
the Teleprinter. Since the In line to "nand" gateMC94C 
is false, the output on pin 11 is true enabling "nand" 
gate MC84B. Therefore, the output pin 8 of MC84B is 
false. At the end of the 9. 09 millisecond period, pin 8 
of MC84B goes true transferring a clock pulse to the 
DataRegister. This clock pulse shifts theDataRegis- 
ter downward one bit. Since flip-flop MC 8 5A was reset 
to a false state and the bit shifted to flip-flop MC85B, 
transistor Q4 is turned on. When Q4 is on, a space 
condition (false) is sent to the Teleprinter. This is 
the start bit (false bit) which starts all ASCII char- 
acters. At the same time, the Divide by 11 divider 
is incremented by one count by the negative -going 
edge of the C flip-flop, MC74B pin 9, setting the D 
flip-flop true. Another 9. 09 milliseconds later, the 
next pulse from the C flip-flop (in the Divide by 8 
divider) causes the next bit in the Data Register to 
shift to flip-flop MC85B and out to the Teleprinter. 
This procedure is repeated 11 times until bit 11 has 
been shifted into flip-flop MC 8 5B. Bits 10 and 11 come 
from flip-flop MC124B which was set true when the 
Data Register was reset prior to storing the output 
characters. The output from "nand" gate MC104C has 
always been high, therefore the Data Register is now 
all true. On the leading edge of bit 11, divider flip- 
flops D, E, and G are true and F is false. Since this 
is an output operation, "nand" gate MC55B is enabled. 
At T3 of the next machine cycle after the eleventh 
shift of the Data Register, the output of "nand" gate 
MC66B goes false, directly resetting the Counter 
Reset flip-flop MC64B. At T5 of the same machine 
cycle, SIR (pin 32 of 86-pin connector) enables "nand" 
gate MC94B. The false output fro m pin 6 of MC94B 
enables "nand" gate MC94D. Since CRS is true, the 
true output from pin 8 of MC94D enables "nand" gate 
MC84A. The false output from pin 6 of MC84A resets 
both Dividers, the Clock Enable flip-flop and sets the 
Flag Buffer flip-flop. This signal remains true only 
for period T5. At T2 of the next machine cycle, the 
ENF signal sets the Counter Reset flip-flop to its set 
state preventing the second Flag pulse. Also at the 
same time, the Flag flip-flop is set and a request for 
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Figure 3-3. Output Timing Diagram 



SFS or SFC forces the SKF output to go true. This 
informs the Computer that the operation is completed 
and it can now process the next character to the 
Teleprinter. 



3-30. Since the first bit from the interface card is 
always true (logic 1) it is not necessary to wait until 
the end of the eleventh bit before issuing a Flag signal 
to the Computer. Since the Clock Enable flip-flop is 
turned off, the Teleprinter is resynchronized to the 
872 Hz oscillator at the start of each character. 
Therefore, the maximum speed of the Teleprinter is 
always available without losing sync with the mech- 
anical mechanism of the Teleprinter. To punch data, 
rather than print it, bit 12 of the control word is true 
and bit 13 is false. If printing and punching are de- 
sired, bits 12 and 13 are set true. When using an 
HP 2752A Teleprinter, either bit 12 or bit 13 set true 
will produce an output, but for any output to occur, 
one of the bits must be true. 



3-31. READ OPERATION . 

3-32. The CRS input signal is transferred through 
pin 13 (86-pin connector) to the input of "nand" gate 
MC66A. The output of this gate directly sets the In/ 
Out flip-flop, MC124A, to the Input condition, resets 
the Print flip-flop MC114B, resets the Punch flip-flop 
MC114A, and resets the Read flip-flop MC24A, MC34B. 
This turns off the Read Command signal to the Tele- 
printer through transistor Q5. To generate a read 
sequence from the Teleprinter, a control word must 
be output to the interface card. Bit 15 must be set in 
the control word as it informs the card that the output 
is a control word. To input data from the Teleprinter, 
bit 14 must be true. Bit 14 is used to generate the 
input condition on the interface card. This is accom- 
plished by an OTA or OTB to the Select Code of I/O 
location of the Buffered Teleprinter Card after the 
control word has been loaded in the appropriate reg- 
ister. If it is desired to print the data as it is entered, 
bit 13 of the control word should also be set. 
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3-33. To read from the Teleprinter tape reader, and 
print the data on the Teleprinter as it is read in, the 
control word to be output would be 160000. When the 
OTA or OTB instruction is implemented, the Select 
Code for the board location comes true. Since bits 13 
and 14 are true, the In/Out flip-flop is set to the In 
state and the Print flip-flop is set true. Since IOBI 12 
is false, the punch flip-flop is set false. At T3B, 
during the first half of the T3T4 IOO signal, a true 
signal, through "nand" gates MC46B, MC46D, and 
MC54B directly resets the Data Register except flip- 
flop MC124B which is directly set. The true state of 
the Print flip-flop, MC114B, results in pin 8 going 
false and the output of "nand" gateMC44B pin 6, true. 
Since the In/Out flip-flop is in the Input state, two of 
the three inputs of "nand" gate MC24B are true. The 
pin 3 input to this gate comes from the Data signal of 
the Teleprinter through pins 4 and D (48-pin connec- 
tor), Schmitt -trigger Ql and Q2, driver Q3 to "nand" 
gate MC104C. The output of MC104C, pin 11, is in- 
verted through MC104A to pin 3 of MC24B causing 



MC104D to operate transistor Q4. This outputs data 
that comes in from the Teleprinter input circuit to its 
separate output circuit. Since Print inhibit transistor 
Q6 is off, the data is printed. 

3-34. The next instruction issued to the card is 
STC,C. The Flag is cleared in the normal manner 
and 'the STC signal is transferred through "nand" 
gates MC36B and MC104B (see Figure 3-4). The out- 
put of gate MC104B (pin 6) is transferred as a true 
input to "nand" gateMC34C. The other input from the 
true side of the In/Out flip-flop enables MC34C. These 
inputs cause MC34C, pin 11, to set the Read flip-flop. 
This turns transistor Q5 on, which starts the Tele- 
printer reader, if its FREE/START/STOP switch is 
in START. When the first space (false signal) from 
the Teleprinter causes the Schmitt -trigger to goto the 
false state, transistor Q3 turns off, setting the output 
of "nand" gate MC104C false and the output of "nand" 
gate MC104A true. This signal goes through "nand" 
gates MC24B and MC104D turning transistor Q4 on, 
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Figure 3-7. Microcircuit Packages, Top View 
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which transfers the start bit (first false signal) back 
to the Teleprinter output circuit. At the same time 
the Clock Enable flip-flop is set by the output of "nand" 
gate MC34A. The true signal from transistor Q3 is 
output through "nand" gate MC25A resetting the Read 
flip-flop. This stops the Teleprinter reader until the 
Computer is ready for the next character. 

3-35. The Clock Enable flip-flop now allows the 872 
Hz oscillator signal to start through the A,B,C divider 
network. Since the input condition is set, "nand" gate 
MC94C is enabled and the outputs from MC94A and 
MC55B are always true. At the end of 4. 545 milli- 
seconds, the C flip-flop of the divider chain goes true 
which causes the output of "nand" gate MC94C to go 
false, and MC84B to go true. This causes the Data 
Register to shift one character and store the data of 
the bit of the ASCII word in flip-flop MC124B. This is 
a zero (false) for the first bit. 

3-36. At the end of the other half of the 9. 09 milli- 
seconds, the C flip-flop goes false which forces the 
Divide by 11 divider to step one count. This process 
continues through the next 10 bits of the ASCII data 
string entering the card with the shift register storing 
and shifting the bits in the middle of each bit and in- 
crementing the counter at the end of the bit. At the 
end of bit 10, the state of divider flip-flops D, E, F, 
and Gbecome 0, 1, 0, 1, respectively. Because "nand" 
gate MC55B, pin 6, is true, the output of "nand" gate 
MC66B goes false after bit 10 at time T3 of the fol- 
lowing machine cycle. This forces the Counter Reset 



flip-flop to be reset which with T5 (through "nand" 
gate MC94B) resets the entire Divider string and the 
Clock Enable flip-flop, and sets the Flag flip-flop. 
Once the signal is detected by the skip flag condition, 
a LIA or LIB instruction will load the 8- bits of data 
into the least- significant bits of the A or B Register 
by enabling IOI, permitting data to pass from the Data 
Register into the IOBI through 7 lines. 

3-37. Since only 10- bits have been shifted, bit is 
now stored in flip-flop MC85A and bit 10 stored in 
flip-flop MC124B. Since bit 11 is a known 1 (true), it 
does not have to be stored or shifted into the Data 
Register. If the Computer requests another character, 
another STC,C instruction is issued, energising the 
reader, and the circuit then waits for the start bit 
(false signal) of the next character to restart the 
divider network and counter. 

NOTE 

The Buffered Interface Card, HP Part 
No. 02116-6168 is similar to the Buf- 
fered Interface Card, HP Part No. 
12531-6001 (A-820-6). For re-order 
purposes, use the 12531-6001 number. 
The 02116-6168 card does not have the 
Status Bit capability. 

3-38. If IOBI 15 of the status wordis set, the card is 
currently in the process of inputting or outputting a 
character. The 8 least- significant bits are not effec- 
tive in a status check. 



SECTION IV 
REPLACEABLE PARTS 



4-1. INTRODUCTION. 

4-2. This section contains information for ordering 
replacement parts for the Buffered Teleprinter Inter- 
face Card. Refer to Table 4-1 for a list of replaceable 
parts in alpha-numerical order of their reference 
designations, with a description and HP part number 
for each part. Table 4-2 lists parts alpha-numerically 
by their HP part numbers. 

4-3. ORDERING INFORMATION. 

4-4. To order a replacement part, address the 
order or inquiry to your local Hewlett-Packard field 



office. See the list at the rear of this manual for 
field-office addresses. 

4-5. Specify the following information for each part 
when ordering: 

a. Hewlett-Packard part number. 

b. Circuit reference designation. 

c. Description. 

4-6. To order a part not listed in Tables 4-1 and 
4-2, give a complete description of the part and in- 
clude its function and location. 
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Table 4-1. Reference Designation Index 



Reference 
Designation 



CI 

C2 

C3,4, 8,10, 12-24 

C5 

C6,7 

C9 

CR1,4,5 
CR2, 3, 7, 8 
CR6 

LI, 2, 3 

MC14,17,27 
MCI 5 
MC16,25,34,36,45, 

46,55,56,76,86, 

94, 104 
MC24,26,35,44 
MC54,66,84 
MC64, 65, 74,75 
MC85, 95, 105,114, 

115,124,125 
MC96, 106,116,126, 

127 
MC106 

Ql,2,3 

Q4,5 

Q6,7 

Q8,9 

QIO.11,12 

Rl 

R3,R21,R25 

R4 

R5 

R6 

R7,29 

R8, 27, 31, 42 

R9,34, 45 

RIO 

Rll,28,32,39,48 

R12 

R13 

R14, 15, 17,18 

R16 

R22, 24 

R23,26 

R30, 46,47 

R35 

R36 

R37 

R38,40 

R41 

R43 

R44 

Wl 



HP Part No. 



0160-0263 
0160-0153 
0180-0291 
0180-0228 
0160-0165 
0180-0338 

1902-0022 
1910-0030 
1901-0040 

9140-0082 

1820-0956 
1820-0069 
1820-0054 



1820-0068 
1820-0071 
1820-0075 
1820-0077 

1820-0974 

1820-0974 

1854-0094 
1854-0215 
1853-0036 
1853-0058 
1854-0094 



0698- 
0698- 
0698- 
0757- 
0757- 
0698- 
0757- 
0698- 
0698- 
0757 
0698 
1810 
1810 
0757 
0698 
0757 
0757 
0757 
0757 
0757 
0757 
2100 
0698 
0698 



3635 
0084 
3153 
0421 
0274 
3132 
0442 
3155 
3154 
0280 
0090 
0008 
0020 
0394 
0085 
0200 
1078 
0199 
0465 
■ 0444 
-0278 
1660 
3440 
3445 



Description 



8159-0005 



C:FXD CER 0. 22UF 20% 50VDCW 
C:FXD MY 1000 PF 10% 200VDCW 
C:FXD ELECT 1UF 10% 35VDCW 
C:FXD ELECT 22UF 10% 15VDCW 
C:FXD MY 5600 PF 10% 
C:FXD ELECT 25UF +75-10% 25VDCW 

DIODE BREAKDOWN: 2.67V 
DIODE: GERMANIUM 100 MA 0.65V 
DIODE: SILICON 30MA 30WV 

COIL:FXD RF 15 UH 

INTEGRATED CIRCUIT 
INTEGRATED CIRCUIT 
INTEGRATED CIRCUIT 



INTEGRATED CIRCUIT 
INTEGRATED CIRCUIT 
INTEGRATED CIRCUIT 
INTEGRATED CIRCUIT 

INTEGRATED CIRCUIT 

INTEGRATED CIRCUIT 

TRANSISTOR: SILICON NPN 
TRANSISTOR: SILICON NPN 2N3904 
TRANSISTOR: SILICON PNP 
TRANSISTOR: SILICON PNP 
TRANSISTOR: SILICON NPN 

R: FXD MET OX 680 OHM 5% 2W 
R-.FXD MET FLM 2. 15K OHM 1% 1/8W 
R:FXD MET FLM 3.83K OHM 1% 1/8W 
R:FXD MET FLM 825 OHM 1% 1/8W 
R:FXD MET FLM 1. 2 IK OHM 1% 1/8W 
R:FXD MET FLM 261 OHM 1% 1/8W 
R:FXD MET FLM 10. OK OHM 1% 1/8W 
R:FXD MET FLM 4.64K OHM 1% 1/8W 
R:FXD MET FLM 4. 22K OHM 1% 1/8W 
R:FXD MET FLM IK OHM 1% 1/8W 
R:FXD MET FLM 464 OHM 1% 1/2W 
RESISTOR NETWORK: MET FLM (6 RES) 
RESISTOR NETWORK: MET FLM (7 RES) 
R:FXD MET FLM 51. 1 OHM 1% 1/8W 
R:FXD MET FLM 2.61K OHM 1% 1/8W 
R:FXD MET FLM 5. 62K OHM 1% 1/8W 
R:FXD MET FLM 1.47K OHM 1% 1/2W 
R:FXD MET FLM 21. 5K OHM 1% 1/8W 
R:FXD MET FLM 100K OHM 1% 1/8 
R:FXD MET FLM 12. IK OHM 1% 1/8W 
R:FXD MET FLM 1. 78K OHM 1% 1/8W 
R:VAR WW LIN 10K OHM 10% 1W 
R:FXD MET FLM 196 OHM 1% 1/8W 
R:FXD MET FLM 348 OHM 1% 1/8W 

JUMPER WIRE 
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Table 4-2. Replaceable Parts 



HP Part No. 


Description 


Mfr. 


Mfr. Part No. 


TQ 


0160-0153 


C:FXD MY 1000 PF 10% 200VDCW 


28480 


0160-0153 


1 


0160-0165 


C:FXD MY 5600 PF 10% 


28480 


0160-0165 


2 


0160-0263 


C:FXD CER 0. 22UF 20% 50VDCW 


56289 


5C52B 


1 


0180-0228 


C:FXD ELECT 22 UF 10% 15VDCW 


28480 


0180-0228 


1 


0180-0291 


C:FXD ELECT 1UF 10% 35VDCW 


56289 


150D105X9035A2 


17 


0180-0338 


C:FXD ELECT 25UF +75-10% 25VDCW 


28480 


0180-0338 


1 


0698-0084 


R:FXD MET FLM 2. 15K OHM 1% 1/8W 


28480 


0698-0084 


3 


0698-0085 


R:FXD MET FLM 2. 61K OHM 1% 1/8W 


28480 


0698-0085 


2 


0698-0090 


R:FXD MET FLM 464 OHM 1% 1/2W 


28480 


0698-0090 


1 


0698-3132 


R:FXD MET FLM 261 OHM 1% 1/8W 


28480 


0698-3132 


2 


0698-3153 


R:FXD MET FLM 3. 83K OHM 1% 1/8W 


28480 


0698-3153 


1 


0698-3154 


R:FXD MET FLM 4. 22K OHM 1% 1/8W 


28480 


0698-3154 


1 


0698-3155 


R:FXD MET FLM 4. 64K OHM 1% 1/8W 


28480 


0698-3155 


3 


0698-3440 


R:FXD MET FLM 196 OHM 1% 1/8W 


28480 


0698-3440 


1 


0698-3445 


R:FXD MET FLM 348 OHM 1% 1/8W 


28480 


0698-3445 


1 


0698-3635 


R:FXD MET OX 680 OHM 5% 2W 


28480 


0698-3635 


1 


0757-0199 


R:FXD MET FLM 21. 5K OHM 1% 1/8W 


28480 


0757-0199 


1 


0757-0200 


R:FXD MET FLM 5.62K OHM 1% 1/8W 


28480 


0757-0200 


2 


0757-0274 


R:FXD MET FLM 1.21K OHM 1% 1/8W 


28480 


0757-0274 


1 


0757-0278 


R:FXD MET FLM 1. 78K OHM 1% 1/8W 


28480 


0757-0278 


2 


0757-0280 


R:FXD MET FLM IK OHM 1% 1/8W 


28480 


0757-0280 


5 


0757-0394 


R:FXD MET FLM 51. 1 OHM 1% 1/8W 


28480 


0757-0394 


1 


0757-0421 


R:FXD MET FLM 825 OHM 1% 1/8W 


28480 


0757-0421 


1 


0757-0442 


R:FXD MET FLM 10. OK OHM 1% 1/8W 


28480 


0757-0442 


4 


0757-0444 


R:FXD MET FLM 12. IK OHM 1% 1/8W 


28480 


0757-0444 


1 


0757-0465 


R:FXD MET FLM 100K OHM 1% 1/8W 


28480 


0757-0465 


1 


0757-1078 


R:FXD MET FLM 1.47K OHM 1% 1/2W 


28480 


0757-1078 


3 


1810-0008 


RESISTOR NETWORK: MET FLM (6 RES) 


28480 


1810-0008 


1 


1810-0020 


RESISTOR NETWORK: MET FLM (7 RES) 


28480 


1810-0020 


4 


1820-0054 


INTEGRATED CIRCUIT 


28480 


1820-0054 


12 


1820-0068 


INTEGRATED CIRCUIT 


28480 


1820-0068 


4 


1820-0069 


INTEGRATED CIRCUIT 


28480 


1820-0069 


1 


1820-0071 


INTEGRATED CIRCUIT 


28480 


1820-0071 


3 


1820-0075 


INTEGRATED CIRCUIT 


28480 


1820-0075 


4 


1820-0077 


INTEGRATED CIRCUIT 


28480 


1820-0077 


7 


1820-0956 


INTEGRATED CIRCUIT 


28480 


1820-0956 


3 


1820-0974 


INTEGRATED CIRCUIT 


28480 


1820-0974 


5 


1853-0036 


TRANSISTOR: SILICON PNP 


28480 


1853-0036 


2 


1853-0058 


TRANSISTOR: SILICON PNP 


07263 


2N3644 


2 


1854-0094 


TRANSISTOR: SILICON NPN 


28480 


1854-0094 


6 


1854-0215 


TRANSISTOR: SILICON NPN 2N3904 


28480 


1854-0215 


2 


1901-0040 


DIODE: SILICON 30MA 30WV 


28480 


1901-0040 


1 


1902-0022 


DIODE BREAKDOWN: 2. 67V 


28480 


1902-0022 


1 


1910-0022 


DIODE: GERMANIUM 5 WIV 


28480 


1910-0022 


2 


1910-0030 


DIODE: GERMANIUM 100 MA 0. 65V 


28480 


1910-0030 


4 


2100-1660 


R: VAR WW LIN 10K OHM 10% 1W 


28480 


2100-1660 


1 


8159-0005 


JUMPER WIRE 


28480 


8159-0005 


1 


9140-0082 


COIL: FXD RF 15 UH 


28480 


9140-0082 


3 


12531-6001 


BUFFERED TELEPRINTER 


04404 


12531-6001 


1 
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DIAGNOSTIC OPERATING PROCEDURE 



1. BUFFERED TELEPRINTER 

2. A Diagnostic Test Tape and Diagnostic Listing is furnished with 
each Buffered Teleprinter Interface Kit. The HP part number of 
the tape is on a label attached to the tape and/or container. Use 
this number and the system serial number for correspondence 
and re-ordering purposes. 

3. This Diagnostic Program checks the Buffered Teleprinter Inter- 
face Card (HP 02116-6168 or 12531-6001) with an HP 2752A Tele- 
printer (ASR33) or an HP 2754A/B Teleprinter (ASR35). 

4. The program consists of a background control program and four 
task routines. The first task routine inserts the address of the 
BUFFERED TELEPRINTER REGISTER into all I/O instructions. 
The second routine tests the flag, control, and interrupt circuitry 
and the data register on the Teleprinter Interface Card. The er- 
rors are stored, and at the end of the test, the program attempts 
to print out the errors. If it fails to print, or if bit 1 of the switch 
register is true, the program will halt where the errors are 
stored. Pressing DISPLAY MEMORY will show which errors 
occurred. The third routine tests the tape punch, tape reader, 
and printer parts of the Teleprinter. All combinations of eight 
bits are punched out, and this tape is read back while the com- 
puter checks the data. Errors are printed out and parts of the 
tape are also printed out as they are read. The fourth routine 
tests the printer and the keyboard parts of the Teleprinter. All 
sixty-four ASCII characters are printed out twice (see tables 1 
and 2). The computer then waits for a character from the Tele- 
printer keyboard (or tape reader), reads in the character and then 
outputs it to the printer. The operator verifies accuracy. 

5. The Buffered Teleprinter Interface Card must be in an unbroken 
interrupt priority string since the diagnostic tests the interrupt 
capability of the board. 

6 - OPERATING PROCEDURE 

a. Buffered Teleprinter Interface Card 

1. Place card in an I/O slot such that every slot of higher 
priority has either another I/O board or a priority 
jumper board in it. 
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2. Connect card to Teleprinter. 

3. If 2754A/B Teleprinter, put MODE switch in KT position, 
b. Buffered Teleprinter Diagnostic 

1. Load diagnostic Test Tape into memory using Basic 
Binary Loader. 

2. Put 000100 into Switch Register. 

3. Push LOAD ADDRESS. 

4. Put address of Buffered Teleprinter card into Switch 
Register. 

5. Push RUN. 

6. Computer will halt with A, B, and T Registers at 102001. 
This is the beginning of testing. 

7. Clear Switch Register. 

8. Push RUN (Computer will sit in Run Loop awaiting Switch 
Register option). 

9. Operator must set Sv/itch Register for desired program 
control option. 

7 • PRO GRAM CONTRO L 

a. Put Switch 3 of Switch Register in up position. The Computer 
then performs the Basic Test task routine and halts if an er- 
ror occurs or if Switch 1 is up. (When Switch 1 is up the Com- 
puter will halt at the top of the Error Codes for all basic tests.) 

HLT55 - The T-Register 102055. The A and B Registers -■-- 
program address which called for the halt. This indicates a 
failure to print, (i.e., no Flag). Push DISPLAY MEMORY 
16 times to display which errors occurred. (The T Register 
will show 000001 for E01, etc.) The 17th push displays all l's. 
Push RUN to return to the main program. Clear Switch Reg- 
ister to terminate basic test. 
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ERROR CODES 

CODE MEANING 

E01 SFC XX true after CLC 0, C instruction 

E02 SFS XX false after CLC 0, C instruction 

E03 SFC XX false after CLF xx instruction 

E04 SFS XX true after CLF XX instruction 

E05 SFC XX false after CLF XX and STC XX 

E06 SFS XX true after CLF XX and STC XX 

E07 No interrupt after STC XX, STF XX, STF 

E10 SFC XX true after interrupt 

Ell SFS XX false after interrupt 

E12 Data Clock on Buffered Teleprinter Card too fast 

E13 Data Clock on Buffered Teleprinter Card too slow 

E14 Data buffer error 

E15 Clock Enable flip-flop set 

E16 Clock Enable flip-flop not set 

E17 Illegal interrupt from teleprinter 

IA Program address at time of E17 

NOTE 

Only the first 15 error codes (E15) are valid with the 
02116-6168 version of the Buffered Teleprinter card. 
All error codes can occur on the 12531-6001 Buffered 
Teleprinter card. 

b. Put Switch 4 of Switch Register in up position. Program will 
perform Punch and Read Task routine and Halt. 

HLT 2 - A, B and T Registers - 102002. This is the begin- 
ning of the punch operation. Turn on punch (if HP 2752A) 
and push RUN. 

HLT 3 - A, B and T Registers - 102003. This is the begin- 
ning of the tape reader operation Turn off the punch (HP 
2752A), load tape into reader, turn on reader, and push RUN. 
Since the Printer and Punch can be controlled independently 
on the 2754A/B but not on the 2752A, the printed output be- 
tween the two teleprinters will be difierent. Table 5-1 shows 
the printout of 2752A Teleprinter and Table 5-2 shows the 
printout of the 2754A B Teleprinter. 

Clear Switch Register to terminate the Punch and Read task 
routine. 
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c. Put Switch 5 of Switch Register in up position. Program will 
perform Print and Keyboard Task routine. At Teleprinter 
request, the operator must input data from the teleprinter. 
This same data is transferred through the computer and 
printed by the teleprinter. Clear Switch Register to termi- 
nate Print and Keyboard task routine. 

d. Put Switch of Switch Register in up position. Computer 
will halt. 

HLT - T Register = 102000, A, B, M, and P Registers - 
100. This is the beginning of the program. Put Teleprinter 
address in Switch Register and press RUN. (This permits 
the testing of multiple teleprinters.) Return to paragraph 6b, 
step 6. 

e 3 With Switch 2 of Switch Register in up position, teleprinter 
printout is suppressed. 
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Table 5-1. HP 2752A PRINTOUT 



BEGIN BASIC TEST 
END BASIC TEST 
BEGIN PUNCH AND READ 

!"#$%&• (>*+,-«/0i23456789tJ<*>? , Printed 

eABCDEFGHIJKLMNOPQKSTUVWXYZ:t\]t^eABCDEH"GHI JKLMNOPURSTUMXYZC 1 While 

> Punching 

!••#$%£• <>* + ,-. /01234S6789 Jl< = >? \ Tape 

iABCDEFGHI JKLMNOPQRSTUVWXYZl\3t«-§ABCDEFGHI JKLMNOPORSTUVWXYZC ) 
eABCDEFGHI JKLMNOPQRSTUVWXYZ[\3t.-@ABCDEFGHI JKLMNOPORSTUV/^XYZC ) Printed 

f While 
r'MSZi' ()*+,-. /01234S6789: J <=>? ( Reading 

tABCDEFGHIJKLMNOP^KSTUV^XYZC\] t - 3ABCDEFGHI JKLMNOPJRSTUVWXYZC ; Tape 

END PUNCH AND KEAU 

BEGIN PRIN1 AND KEYBOARD 

8ABCDEFSHI JKL.MNOPORSTUVWXYZl\.)r- 
!•' , *$%& ' < > * + , -./«3 1234567 89 t J < = >? 

©ABCDEFGHI JKLM^IOHJRSTUVv^XYZL\J»♦• 
!*''*£%& , <)*+,-. /J123456789t;<=>? 

Joe. KEYBOARD SLOWLY (b CHS. /SEC.) 



1234S6789<3:- !"#$%& ' ( )*= i 
^EKTYUIOP-f* 

asdfghjkl; t\+ 

ZXCVBNM*./ t ]<>? 

r:ND PRINT AND KEYBOARD 



i Operator 

> Using 

\ Keyboard 
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Table 5-2. HP 2754A/B PRINTOUT 



BEGIN BASIC TEST 
END BASIC TEST 
BEGIN PUNCH AND READ 



!*•#$%*• <>*♦ , -,/0 1234567 89 IJ<=>? 
«ABCDEFGHIJKLMNOPQRSTUVWXYZC\]t.-<aABCD£FGHIJKLMNOPQRSTUVWXYZ 
#ABCDEFGHIJKLMNOPQRSTUVWXYZC\]t-@ABCDEFGHIJKLMNOPQRSTUVWXYZ 
#ABCDEFGHIJKLMNOPQRSTUVWXYZC\]t.-@ABCDEFGHIJKLMNOPQRSTUVWXYZ 

END PUNCH AND READ 

BEGIN PRINT AND KEYBOARD 

0ABCDEFGHI JKLMNOPQRSTUVWXYZC\3t.- 

?••#$%«• <>*+#-./ 01 23456789 II <=>? 
eABCDEFGHIJKLMNOPQRSTUVWXYZC \ 3 t- 

!"#$%*• () *+>-./01 23456789 «J<=>? 

USE KEYBOARD SLOWLY (5 CHS. /SEC.) 






Printed While 
Punching Tap* 
Printed While 
Reading Tape 



1234567 890 I -!"#$** • <>* = 
QWERTYUIOP-@ 
ASDFGHJKLU\ + 
ZXCVBNM*./t ]<>? 

END PRINT AND KEYBOARD 



Operator 

Using 

Keyboard 
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2115A BUFFERED 
TELETYPE TEST 



Binary Tape - HP20420A 



Source Listing- HP20U20AL 



■1-/-2- 



20420A 

PAGE «3tU 



0;4t*l ASI*B,A,B,L 

* * NO r_ k * t K b * 



-S-/-4- 



PAGE f)00i #01 



0001 

0l'>03* 
0004* 

0fcjtf5* 
0006* 

0008* 
0fc)09* 
0010* 
«**Sl 1 * 

00 12* 
*• 1 3 * 
IS 1 4 * 
M 1 5 * 
00 lb* 
W^ 1 7 * 

a k! i a * 
0019* 

0W20* 

0021* 

0022* 

0023* 

0024* 

8025 

0026 

0027 

002B 

0029 

0030 

0031 

0032 

0033 

0034 

0035 

0036 

0037 

0038 

0039 

0040 

0041 

0042 

0043 

0044 

0045 

0046 

0047 

004b 

0049 

0050 

0051 

0052 

0053 

0054 

0055 

0056 

0057 



ASMS, A,8,L 



BUFFERED TELETYPE DIAGNOSTIC 



STARTING OCTAL ADDRESS ■ 100 

* * * 

THE FOLLOWING SWITCH REGISTER SETTINGS 
ARE USED FOR PROGRAM CONTROL 



BIT 
BIT 
BIT 
BIT 
Bl f 
BIT 
*** 




1 
2 
3 
& 

5 



«■> 
«•> 



MAIN PROGRAM 



VWB77 

00100 
00101 
00102 
00103 
00104 
00105 
00106 
00107 
001 10 
00111 
00112 
00113 
00U4 
00115 
00116 
00117 
00120 
00131 
00122 

00 123 
00124 
00125 
0012*> 
00127 
00130 
00131 
00132 
00133 

001 34 
00135 
031 ,56 



1026500 
107 7 00 
102501 
010141 
070277 
014203 
064142 
060143 
070111 
060144 
070010 
034111 
0020^4 
006006 
0241 11 
06H401 
070.400 
014720 
060123 
064123 
102H01 
I 4 H 5 
060177 
000010 
0143(10 
014145 
06M200 
0000 10 
015024 
014 145 
06^201 
000?! 10 



HALT AT BIGINNJNG OF PROGRAM 
HALT AT ERROR BUFFER 
SUPPRESS MESSAGE PRINTOUT 
PERFORM BASIC TEST ROUTINE 
PERFORM PUNCH AND READ ROUTINE 
PERFORM PRINT AND KEYBOARD ROUTINE 



END 



STA1 



MP! 



ORG 

MLT 

CLC 

LIA 

AND 

STA 

JSB 

LDB 

LDA 

STA 

LDA 

STA 

IS? 

INA 

INB, 

JMP 

t. A 

STA 

JSB 

LDA 

LDB 

HLT 

JSB 

LDA 

SLA 

JSB 

JSB 

I. D A 

SLA 

JSB 

JSB 

Li) A 

SLA 



77H 



0,C 

1 

MSK0 

BTA 

IN1T 

M67 

HIS 

* + ? 
HI 
10B 

*-i 

SIB 
*-4 
II J 



EOL 

*+:? 

* + t 
l 

MORE 
BIT3 

BT 

MODE 
6 1 T4 

PA i; ? 

CODE 
BITS 



INITIALIZE, INTERRUPT OFF 
PUT TTY 
ADDRESS 

INTO ALL I/O 
INSTRUCTIONS 
PREPARE 
TRAP 
FOR 

ILLEGAL 

INTERRUPT 
FROM 

ANOTHER 
DEVICE 

PREPAY ILLEGAL TTY 

INTERRUPT TRAP 
LINE FEED 
HALT TO CHOOSE 

SWITCH REGISTER 
OPTIONS 
CHECK SW. REG. 
PERFORM 

BASIC TEST? 
YES. 

NO. CHECK SW. REG. 
P E w F R M 

P u N C h AMD R E A ? 
Y* S. 

V- V . CHECK 8 w . k E i • . 
PfcRFOWM 

PRlMT AND KEYBOARD? 



5- 



PAGE 0-343 #01 



Best) 8 


00! 3 7 


015 310 




JSB 


PAK 


YES. 


0059 


00)40 


024124 




J MP 


MPl 


NO. 


0060 


00141 


000077 


MSK0 


OCT 


77 




0061 


00142 


17 771 1 


M67 


OCT 


177711 




0t«62 


00143 


070010 


HIS 


STA 


10B 




0063 


00144 


102010 


HI 


HLT 


10B 




0W64* 














6)06?)* 


SWITCH 


REGISTER MONITORED 




0060* 


FOR CURRENT OPERATING MODE 




6 7 * 














0w6tt 


00 1 46 


000000 


MODE 


NOP 




ENTER SUBROUTINE 


Vj h Sr 


a a i .a 6 


073173 




STA 


AS0 


STORE A 


f ' H 7 (fl 


117 


102501 




LI A 


1 


EACH BIT 


t> ,■; / J 


3 1 6 


070174 




STA 


BIT0 


FROM THE 


V\,/2 


1*1 


001300 




RAR 




SWITCH REGISTER 


w ^ / 3 


k) 1 h 2 


\s 7 1 7 5 




STA 


BITl 


IS ROTATED 


iU-i/A 


019 3 


001:400 




RAR 




INTO THE 


0{->7 5 


00) 6«* 


070176 




STA 


BIT2 


LEAST SIGNIFICANT 


007 6 


03 1 35 


001 300 




RAR 




POSITION AND 


W ,'. 7 7 


00 1*; f '•> 


7 1 7 7 




STA 


BIT3 


STORED IN THE 


K tf 7 8 


Midi t7 


001300 




RAR 




STORAGE LOCATION 


(4 7 y 


! 60 


070200 




STA 


BIT4 


BEARING ITS NAKE 


« a fct 


90161 


001300 




RAR 






v» « J. 


« 1 h ? 


070201 




STA 


BIT5 




0v b2 


00 1 63 


060174 




LDA 


BIT0 


HALT AT BEGINNING 


0(^,3 


001*4 


002011 




SLA, 


,RSS 


OF PROGRAM? 


Vt ** H 4 


I f/j 


024171 




JMP 


* + 4 


NO. 


00 85 


00166 


060202 




LDA 


HAD 


YES. LOAD A AND B 


0086 


00167 


064202 




LDB 


HAD 


WITH 100 


B 7 


001 70 


0241377 




JMP 


END 


AND HALT 


0H88 


00171 


060173 




LDA 


ASP* 


RESTORE A 


8 9 


0017? 


124145 




JMP 


MODE, I 


EXIT SUBROUTINE 


0fel4K) 


001 73 


000000 


AS0 


OCT 





TEMPORARY STORAGE 


fcO fc 9 1 


17<i 


000.100 


PIT0 


UCT 







0092 


0317b 


000800 


BITl 


OCT 







0w93 


031 76 


000000 


BIT2 


OCT 







9 4 


00} 77 


000000 


BI 13 


OCT 







0095 


00?00 


000000 


8IT4 


OCT 







0096 


0030 1 


000000 


BUS 


OCT 


<* 




0097 


00302 


000100 


HAD 


OCT 


100 




0098* 














0099* 














0100* 


INITIALIZATION 


ROUTINE 






en en* 














0102*THlS ROUTINE ADOS THE BUFFERED TELETYPE ADDRESS To 


01(33* 


ALL I7C 


1 INSTRUCTIONS 


» 






1*104* 














mas* 














0106 


00203 


000000 


INI T 


NOP 




ENTER ROUTINE 


0107 


00204 


107700 




CLC 


9-tC 


INITIALIZE, INTERRUPT OFF 


0108 


00205 


01427B 




JSB 


ADIN 


PUT TTY ADDRESS 


0109 


00206 


102300 




SFS 





INTO SFS INSTRUCTIONS 


0] 10 


00207 


0701532 




ST* 


SFS1 




mn 


? 1 V" 


7 3 4 1 




STA 


SFS2 




*HU 


V3 ,>\ 1 


7*. 3 '•> 1 




STA 


SF53 




* i u 


d^'U 


^ 7 •-■■ 7! / .3 




STA 


SFS4 




/ 1 1 4 


3 > i ^ 


«" 7 " 6 *■> / 




STA 


SFS5 
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page: 00< : i4 #0j 



01 ib 

0116 
0117 
0116 
0119 
0120 
0121 
0122 
0123 
0124 
0125 
0126 
0127 
0128 
0129 
0130 
0131 
0132 
fel33 
0134 
0135 
0136 
0137 
0138 
0139 
0140 
0141 
0142 

0143 
0144 
0145 
0146 
014/ 
0146 
01 AU 
BJ50 
0151 
B152 
153 

154 
0155 
0156 
01S7 

ej be 

0159* 
0160* 
0161* 
W162* 
!.,' 1 f> 3 * 

01 b4 
0165 
0166 
0167 
01 f>H 
1 ft s< 
0l7k> 
017 1 



00214 

00215 

00216 

00217 

00228 

00221 

00222 

00223 

00224 

180225 

00226 

00227 

00230 

00231 

00232 

00233 

00234 

00235 

00236 

00237 

00240 

00241 

00242 

00243 

00244 

00245 

00246 

002 4 7 

00230 

00251 

00252 

00253 

00254 

;> "i h 

00256 

00257 

00260 

00261 

00262 

00263 

00265 
00266 

00267 



0142/0 
102200 
070326 
070336 
070346 
070367 
014270 
102600 
&7B4®7 
070442 
070661 
070664 
071325 
0H270 
103700 
07041 1 
070665 
071327 
014270 
106700 
070412 
014270 
102700 
070345 
0142/0 
103100 
070 335 
014 2/0 
10 2)00 

070360 

1 4 2 7 a 

1 6 5 , a 

7-*dA$ 
7 1 7 18 
07 1257 
M71272 
M713M0 
071334 
0142/0 

070(*fl0 

070117 

070356 
070366 

1242*13 



J SB 

SFC 

STA 

STA 

STA 

STA 

JSB 

OTA 

STA 

STA 

STA 

STA 

STA 

JSB 

STC 

STA 

STA 

STA 

JSB 

CLC 

STA 

JSB 

STC 

STA 

JSB 

CLF 

STA 

JSB 

STF 

STA 

JSB 

LIB 

STA 

STA 

STA 

STA 

STA 

STA 

JSB 

5T4 

STA 

STA 

STA 

JMP 



At) IN 


SI- CI 
SFC2 
SFC3 
SFC4 
A U I N 


OU1 

0TA2 

OTA 3 

OT A 4 

OT A 5 

AID IN 

B#C 

STCCi 

STCC2 

STCC3 

A I) IN 



CLCt 

AD?N 



srci 

AD IN 



CLF1 
At) IN 



STF1 

A!) IN 



L IBt 
L 1B2 

Ll«3 
L1B4 
LIBS 
L IR6 
AD1M 
V 

STA I 
S T A 2 
ST A 3 
I N I T , I 



PUT TTY ADDRESS 

INTO SFC INSTRUCTIONS 



PUT TTY ADDRESS 

INTO OTA INSTRUCTIONS 



PUT TTV ADDRESS 

INTO 8TCC INSTRUCTIONS 



PUT TTY ADDRESS 

INTO CLC INSTRUCTION 

PUT TTY ADDRESS 

INTO STC INSTRUCTION 

PUT TTY ADDRESS 

INTO CLF INSTRUCTION 

PUT TTY ADDRESS 

INTO STF INSTRUCTION 

PUT TTY ADDRESS 

INTO LIB INSTRUCTIONS 



ADDRESS INCLUSION SUBROUTINE. 
THE BUFFERED TTY ADDRESS IS PUT 
THE INSTRUCTION FQLL0WIN8 JSB AD 



00270 000000 AD.1N NOP 



00271 

00272 
00 2 73 
00274 
tf a v ; b 

0vi?/t 



160270 

010276 
83*>277 

3*270 
). 2 f. ? 7 *■< 
177/ -H* 



00?77 00rta*J< 



fiSi* 1 
BT A 



LDA 
AND 
IOR 
IS? 

JMP 
OCT 
OCT 



A II I N , I 

(1SK1 

BTA 

ADIN 
A U I N , I 

177700 



PUT TTY ADDRESS 

INTO STA INSTRUCTIONS 



F'XIT ROUTINE 



INTO 
IN. 

ENTER SUBROUTINE 

BRING I/O INSTRUCTION IrtTO A 

ADD TTY ADDRESS 

TO INSTRUCTION 
EXIT 

SUBROUTINE 

TTY ADDRESS STORAGE 
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PAfaE 00^5 *01 



« J 72* 












m 5 7 v5 * 












« 17 4* 












^ 1 7b* 


BASIC 


TEST ROUTINE 






«176* 












*<1 77* 


iH£ FOLLOWING 


TESTS 


The i 


FLAG, 


« 1 7 b " 


ANU INTERRUPT 


CIRCUITRY 




«l/9* 












1 » 


sd ,< 


000000 


BT 


NOP 




1 rt 1 


80. $01 


10/700 




etc 


Q,r, 


i a 2 


00,502 


060676 




LDA 


SOYN 


M) b3 


00303 


070*75 




. 3TA 


OYN 


* 1 «i 4 


01*304 


060621 




LDA 


SIl 


k) 1 a b 


003n5 


014733 




JSP 


.SMPOC 


0166 


003*6 


0»b 400 




CLP 




r " 1 b / 


3 id 7 


H74:>70 




STB 


k 1 


W 1 »i d 


3 1 <rf 


074 571 




STB 


E2 


01H9 


id a 3 1 1 


0/4572 




ST8 


F.3 


a 1 9 


d M 2 


0/4373 




ST« 


E4 


) -V 1 


3*3 


074574 




STB 


fcb 


tM 9 if 


K» a 3 1 4 


7 4 5 7 5 




S T f < 


6 6 


^193 


00315 


07^576 




!>TH 


b7 


to! 94 


3 1 e 


074577 




STH 


t Is* 


0195 


0317 


0746^0 




STH 


t \ 1 


0196 


003?0 


07 4 601 




STB 


f 1? 


0197 


00321 


0/4502 




STB 


E13 


01 93 


00322 


074&tf3 




STB 


E14 


0199 


631*323 


074604 




STB 


El's 


0200 


00324 


074605 




STB 


IA 


I02WI 


0032b 


0*6004 




INB 




0202 


i»i)32b 


U2200 


SFC1 


SFC 





^2WJ 


0032/ 


024331 




JMP 


* + ? 


0204 


00330 


074570 




STB 


El 


^205 


303 31 


006004 




IMP 




0219b 


0033? 


102300 


SFSl 


SFS 





3207 


033 33 


0745/1 




STB 


E2 


0208 


00334 


0060W4 




IMP 




0209 


00335 


103100 


CLU 


CL.F 





0210 


«J id 3 3 6 


102200 


SFC2 


SFC 





021 1 


08337 


074572 




STR 


fc3 


0212 


00340 


006004 




INB 




^213 


00341 


102300 


SFS2 


SFS 





49214 


00342 


024344 




JMP 


» + ? 


0215 


00343 


074573 




STB 


F.4 


0216 


03344 


0065104 




INP 




02 I 7 


3 4 5 


102700 


STC1 


STC 





«ai8 


3 4 6 


102200 


SFC3 


SFC 


(5 


*219 


0034 7 


k) 7 4 57 4 




STB 


fc5 


0220 


0035fc 


006i?i04 




IMP 




0221 


0035} 


102300 


SFS3 


SFS 





K)222 


00352 


024354 




JMP 


*♦? 


0223 


00353 


074575 




STB 


E6 


0224 


03354 


006304 




INR 




0225 


00355 


6 W 4 *) g 




LDA 


IJ! 


W226 


00^f' 


7 ti ci a M 


ST A 2 


3TA 


P 


0227 


8 S b 7 


1 «2l 510 




ST(- 


f 


*5228 


0X6 1 • 


1 *2 lvU* 


STH 1 


M l " 


■ ■'. 



CONTROL, 



INITIAL I ZE r INTERRUPT OFF 

PESTOPF 

OUTPUT COf'E 
PRINT FIRST 

BT MESSAGE 
CLEAR 

ERROR 
BUFFER 



INCREMENT ERROR CODE 
FLAG CLEAR? 

NO, 

YES. ERROR j 

INCREMENT ERROR CODE 
FLAG SET? 

NO, ERROR 2 

YES. 
CLEAR FLAG 
FLAG CLEAR? 

NO, FRW'iP 3 

YES. 
FLAG SET? 

NO. 

YES. FRROR 4 

SET CONTROL 
FLAG CLEAR? 

NO. ERROR 5 

YES. 
FLAG SET? 

NO. 

YES. ERROR 6 

PREPARE TO TEST 

INTERRUPT SYS! E (•' 
T jR * .v-«i INTERRUPT SiSIt "i 
Rt f F l. A C ; 



PAS*- tt'42f> #Wl 



0229 

023B 

0232 
fe»233 

tf?34 
0?35 
if- 2 3 6 
i-<<>3 7 
W2 3 8 
^J4 
^ ^ 4 VJ 
tf 2 4 1 
V< 24 2 
0243 
02 4 4 

0?46 
; /3 2 4 7 * 
A <.' & % * I 
/ 4 9 * 
w ? b 
02b 1 
»2b2 
02»3 
/- ,2 6 4 
^ 2 5 b 
^ 5 e> 
(r5267 
0258 
0259 
0260 

0262 

0263 

0264 

4)265 

0266 

0267 

0268 

0269 

0270 

0271 

0272 

0273 

0274 

0273 

0276* 

0277* T 

0278* 

0279 

0230 

0281 

0282 

0283 

0284 

0285 



3 3 ft 1 
.^ 6 2 
W 4 3 *. 3 
.1 6 4 

<> * 5 

3^6 
rf 3 7 
:■( 7 ^ 
a .1 7 1 
00572 
:? 7 3 
3 7 4 
3 7 5 
3 7 6 
00377 

004 01 

4 0? 



g 'A i^ !« 

tf J' /» V! 

tf 7 <4 r> 7 b 
W 6 ? <4 A 
6 4 11 
7 v) -A 4 

l e 2 i> a 

»?4,i72 
H7 4577 

6 4 
102300 
7 4 6 3 
006BH4 
074402 
024403 
024364 
014503 
000000 



HI 

ST A 3 

SFC4 



SFS4 



1 J 1 
I IJ 

ERNO 



NOP 
NOP 
STH 
INB 
LDA 
ST A 
SFC 
JMP 
STB 
INS* 
SFS 
STH 
IN« 
STB 
JMP 
JMP 
J SB 
OCT 



17 
I IJ 





* +|> 

F. IP 

Ell 

ERNO 
TOUT 
PI 
1L1NT 





WAIT F 'J R 

INTERRUPT 
NO INTERRUPT - ERROR 7 
INTERRUPT ENTRY 
RENE* ILLEGAL 

INTERRUPT TRAP 
FLAG CLF AR? 
NO. 
YES. ERROR 10 

FLAG SET? 

NO. FRRHR 11 

YES. 
STORE ERROR CODE 



FRROR CODE' STORAGE 



HE FOLLOWING IfcSTS THE TIME FOR OUTPUT I NG ONE CHARACTER 



00 4*13 
00 4 4 4 
0040b 

00406 

i 7 
4 1 
4! 1 
004 12 
4 1 3 
00414 
00415 
004 16 
004 J 7 
00420 
00421 
00422 
00423 
00 4 24 
00425 
00426 
00427 
00430 

00431 

00432 
00433 

4 3 4 



% 
107700 
102100 
060432 
102600 
064433 
103700 
10 6 7 4 
014461 
024416 
024420 
064402 
074601 
034402 

000000 

6 4 4 3 4 
014461 
024427 
064402 
7 4 6 d 2 
034402 
000(7100 
024435 
100000 
150300 
1775540 



TOUT 



OTA1 

STCCt 
CLCl 



ONN 

TOC1 

T0U2 



NOP 
CLC 
STF 
IDA 
OTA 
LDB 
STC 
CLC 
JSB 
JMP 
JMP 
LDB 
STB 

isz 

NOP 
LDB 
JSB 
JMR 
LDP 
STR 
IS? 
NOP 
JMP 
OCT 
OCT 
OCT 



v,' , [ 

!■■< 

ONN 



TOC1 

f ,C 

M 

TOS 

* + ? 

**3 

ERNO 

El 2 

ERNO 

TOC2 

TOS 

*+3 

ERNO 

E13 

ERNO 

DT 

100000 
150000 
177040 



INITIALIZE, INTERRUPT OFF 

INTERRUPT ON 

PUT INTO OUTPUT, NO 

PRINT, NO PUNCH MODE 
CHECK 

LOwER 
TIME 
FLAG SET? 
YES. DATA 
NO. 
ERROR 1? 



LIMIT 



CLOCK TOO FAST 



INCREMENT ERROR 
CHECK UPPER 
TIME LIMIT 

FLAG SET? 

YES. TIMING OK 

NO. DATA CLOCK 

ERROR J 3 
INCREMENT ERROR 



CODE 



TOO SLO* 



CODE 



OUTPUT, NO PRINT, NO PUNCH 
TIMEOUT CONSTANT 1 
TIMEOUT CONSTANT 2 



HE FOLLOWING TESTS THE EIGHT BIT DATA BUFFER. 



0043P 
00436 
00417 
00440 
00441 
00442 
00443 



000000 
107700 

0024*10 

0704b7 
010455 
102600 
106500 



DT 



P2 

0TA2 
LI HI 



NOP 
CLC 
CLA 
STA 

AND 
T A 

lie 



0,C 

CUR WD 
MSK2 





initialise:, interrupt off 

OUTPUT THE 
CURRENT 
WHRp 
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v A ;.» r. «c A i / tf 1 



02»6 00444 050001 CPA 1 INPUT * OUTPUT ? 

0287 0344b 024430 JHP P3 YES. 

028ft 00446 060402 LDA ERNO NO. ERROR 14 

28* 0(8447 07 0»»Sfe93 STA E 14 

02M0 00450 060457 P3 LDA CURWD INCREMENT 

&2«l 00451 002006 INA,8IA CURRENT WORD 

W2y2 00432 024440 JMP P2 

0293 00453 014472 JSB EBH HALT AT ERROR BUFFER? 

0294 00454 024515 JMP POUT NO. 
02Q5 00455 000377 MSK2 OCT 377 

02^6 00466 000200 MSK3 OCT 200 

fei-y/ 00457 000000 CURhD OCT 

0^9» 04460 000300 NBE OCT 

0299* 

03l40*FLAU TIMEOUT SUBROUTINE 

3 M 1 * 

0302*T IrtKJt'T CONSTANT IN B 

03i»3*lF "FLAG" BEFORE TIMEOUT, EXIT TO TOS. IF NOT, 

«J|(J4*EAIT TO TOS *■ 1. ONE ITERATION ■ 6.4 MICROSEC. 

3 5 * 

0306 0046 1 000030 TOS NOP ENTER SUBROUTINE 

iA6ti/ 00462 102300 3FS5 SFS FLAG SET? 

0308 00463 024465 JMP *+2 

0309 084*4 124461 JMP TOS, I YES. EXIT THROUGH TOS 

0310 0046b 006006 iNBfSZB NO. TIMEOUT YET? 

0311 00/166 024462 JMP SFS5 NO. REPEAT 

0312 09«467 034461 ISZ TOS YES. EXIT 

0313 *M<i/0 000000 NOP THROUGH 
*'3 14 01171 i24<J6l JMP TOS, I TOS + I 
'/' 3 1 5 * 

0Jlb*EKHuR BUFFER HALT SUBROUTINE 

*" 3 1 7 * 

031S 00J/2 000300 EBH NOP ENTER SUBROUTINE 

031V 03473 070502 STA ASl STORE A 

¥?320 00474 014J45 JSB MODE CHECK SW. RES. 

0321 0047? 060)175 LDA BITl HALT AT 

0.522 0*5476 000*10 SLA ERRO» BUFFER? 

0323 00477 014564 JSB POF YES, 

0324 00500 060502 LDA ASl NO. RESTORE A 
032b 036-11 124472 JMP EBH, I EXIT SUBROUTINE 
0326 00502 000000 ASl OCT TEMPORARY STORAGE 
1*327* 

0328MLLEGAL INTERRUPT SUBROUTINE 

0329* 

0330*EOR AN ILLEGAL TTY INTERRUPT, THE PROGRAM ADDRESS IS SAVED. 

0.531* 

0332 00603 000000 ILINT NOP ENTER SUBROUTINE 

0333 00504 070513 STA AS2 STORE A 

0334 00505 060503 LDA *-? STORE PROGRAM ADDRESS 

0335 00506 070605 STA IA 

0336 00507 060514 LDA IE STORE 

0337 00510 070604 STA E 1 5 ERROR 15 

0338 006JJ 060513 LDA AS? RESTORE A 

0339 3051? 124503 JMP ILINT, 1 fXIT SUBROUTINE 
034tf 0-VM3 0^0i/i00 AS? OCT TEMPORARY STORAGE 
03«1 *^H fc'»?iN'U5 !E OCT 15 

v: 3 4 2 * 
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H A ij k i) J !" S # /' 1 

0343*rMfc FOLLOWING PRINTS OUT THE RESULTS OF THE BASIC TEST. 
0344*iN CASE OF FAILURE TO PRINT OUT, THE PROGRAM 

0345*HALTS AT THE BEGINNING OP THE ERROR SUFFER, 

B346*PR£SSING "DISPLAY MEMORY" WfLL SHOW WHICH ERRORS OCCURCD. 
0347* 

0348 00516 000000 POUT NOP 

0349 03516 107700 CLC 0,C INITIALIZE, INTERRUPT OFF 

0350 00517 006400 CL* 

0351 00520 014461 JSB TOS FLAG SET? 

0352 00521 0241523 JMP * + ? YES. 

03b3 00522 014564 JS* POF NO. HALT AT ERROR BUFFER 

0354 00523 060633 IDA SC? PREPARE TO 

0355 00 e >24 070634 STA KM PRINT OUT 

0356 005£b 06M635 IDA SJ5 ERROR CODES 
035 7 00^26 07 «527 M4 P4 

0358 00S2? W64b70 ^4 LOH El LOAD R WITH 

0359 *ld530 034927 IS? *-l ERROR STORAGE 

0360 0*3531 006002 SZB ?ERO? 
03bl 00532 024536 JMP **4 NO. 

0362 0B533 034634 IS? M14 YES. PARTIALLY DONE? 

0363 *505 34 0JM527 JMP P4 NO. 

0^54 k)0>35 024544 JMP H5 YES. CHECK INTERRUPT ERRORS 

0365 104*536 08*636 IDA E PRINT 

0366 00637 014654 JSP OYNA OUT 

0367 00<j4C 6114701 JSB POUT2 ERROR 
W358 005al 014720 JSB EOL CODE 

03fW 00 r -'.42 014472 JSB EBH HALT AT ERROR BUFFER? 

t*3 7i4 »ia«,43 V?24533 JMP *-10B NO. 

0;57 1 id a '3 4 4 W64604 P5 LOB E15 E15 » 0? 

W372 0054b 0k567103 SEH,RSS 

W373 0^54^ 024560 JMP P6 YES. 

1M74 00647 060636 LDA E NO. 

03/b W0550 014654 JSH OYNA PRINT OUT 

^'378 00551 014731 JSP P0UT2 ERROR CODE 

0377 00552 060653 LDA SI4 AND 

0378 00553 014751 JS« MPD PROGRAM ADDRESS 

0379 00534 060605 LDA IA WHEN ERROR 
0,580 00555 014774 JSB OP t OCCURRED 

0361 00566 014720 JSB EOL LINE FEED 
0382 00557 014720 JSB bOL LINE FEED 
0363 0*>560 060632 P6 LDA SI? PRINT SECOND 
0,584 00561 014733 JSB SMPOC BT MESSAGE 

0,565 00562 014472 JSB E8H HALT AT ERROR BUFFER? 

0386 00563 124300 JMP BT,I NO. EXIT ROUTINE 

0387 00564 000000 POP NOP 

0368 00566 06»564 LDA *-l PUT PROGRAM ADDRSSS 

0389 0id566 064564 LUB *-2 FOR PRINT FAILURE 

0390 00567 102055 HL.T 55H P'TO A AND B 
039 1* 

0392*ERR<)R BUFFER 
0393* 

0394 00570 000000 fcl OCT f* SFC TRUE AFTER CI C 0,C 

0395 00671 000PI00 E2 OCT SFS FALSE AFTER CLC 0,C 

0396 00672 000000 E3 OCT SFC FALSE AFTER CLF TTY 
039 7 00573 000000 E4 oc T «• SFS TRUE AFTER CLF TTY 

0398 0057* 000H&0 E5 I'd & HFC FALSE AFTER CLF TTY AND STC 

0.599 03*,76 i^0(^l^0 F.6 OCT V SFS TRUE AFTER CLF TTY AND STC 

-11- 
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0400 
0401 

0402 
#403 

0404 
£.405 
*$4 06 

vu0 7 

4 09 
0410* 

M4i i 



* 4 1 2 
■I 4 1 3 
V. 4 I 4 



041b 

0416 
0417 
0416 
0419 
0420 
0421 



5 7 <" 
00^77 

00^00 

00601 
0060? 
00603 
006,j4 

00M6 

0060? 

00610 
611 
0612 
00613 
0061 4 
00615 
00616 
00617 
00620 
00621 
00622 
00623 
00*24 
00625 
00626 
00627 
006 30 
00631 
00632 
00633 
00634 
00635 
00636 
00^:!17 
006 4 
0064 1 
00*4* 
00643 
00644 
00*45 
00646 
00647 
00650 
006St 
00652 
08653 



000000 

000000 
000000 
000000 
000000 
000000 
000000 
000000 

177777 

024124 

04U05 
04351 1 
047^40 
04 1 1^1 
051511 
041 440 
052105 
051524 
000300 
060M0 
042 SI 6 
042040 
041101 
051 Si 1 
041440 
052105 
051524 
000300 
060522 
177764 
000*00 
064570 
000505 
020340 
020120 
051 117 
043522 
040515 
020101 
042 104 
051 105 
05i!$23 
0201975 
020U40 
000100 
060(*37 



fc7 OCT ft NO INTERRUPT AFTER STC TTY,STF i 

Utf OCT 3FC TRUE AFTfrR INTERRUPT 

Ell OCT SFS FALSE AFTfcR INTERRUPT 

Ei2 OCT P> DATA CLOCK DM TTY BOARD TOO FAST 

E13 OCT W DATA CLOCK ON TTY BOARD TOO SLO* 

tl4 OCT DATA BUFFER ERROR 

E15 OCT ILLEGAL INTERRUPT FROM TELETYPE 

IA OCT PROGRAM ADDRESS AT TIME OF Elb 

OCT 177777 ERROR BUFFER TERM I H A I TO-N 

JMP HPi RETURN TO *AlN PROGRAM 

8T*1 ASC 8,BE01N HASIC TEST 



SU 

BTM2 



SI2 

SC2 

M14 

SI3 

E 

PRAD 



OCT 
IDA 
ASC 





BTM1 
7 , F N 1.) 



BASIC TEST 



OCT 
LDA 
OCT 
OCT 

LDB 
OCT 
ASC 



k. 

RTM2 

177764 



El 

305 

11, PROGRAM 



AHDRESS » 



0422 00652 000*00 OCT 

0423 08653 060(^37 SJ4 LDA PRAD 
0424* 

0425*PR1NT LEAST SIGNIFICANT 8 BITS OF A 
0426* 

0427 0061-54 000100' OYNA NOP 

0428 00*55 107700 CLC 0,C 

0429 00656 070677 STA AS3 

0430 00*5? 0747C10 STB 8St 

0431 00660 06 06/5 LDA OYN 

0432 006*J 102600 0TA3 OTA 8 
*433 0«66k? 060677 LDA AS3 



ENTER SU8R0UTINE 
INITIALIZE, INTERRUPT OFF 
STORE A 
STORE B 

PUT BUFFER INTO OUTPUT 

AND PRINT MOOF 
RESTORE A 
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04,54 
0435 

If -: A i) 7 

(3 4 3 6 

rf434 

04 4 

('5 4 4 1 

"'> 4 4 ^ 

v;44 3 

»■■• 4 4 4 

^4 4 5 

ti4 4 t> 

f,4 47 

y 4 4 8 * 

w 4 4 9 * P k n 

0450* 

4 b 1 



5? *) ft rt 3 
v. 1 J 6 6 4 
i. ? 4 6 «'■> 6 
00666 
00667 
0067P 
00671 
«9 f - 7 2 
00673 
00674 
4 6 7 ft 
a 3 6 7 h 

007130 



l 4 5 5 
l 02600 
1037 00 
006430 
014461 
024572 
014564 
060677 
W64700 
124654 

120000 
k9 a » P* fel 

000000 



0TA4 
STCC2 



OVN 
SOYN 

A S3 

as i 



AND 
OTA 
STC 
CL« 
JSB 
JMP 
JSB 
LDA 
LDR 
JMP 
OCT 
OCT 
OCT 
OCT 



MSK2 



0,C 

TOS 

* + ? 
POP 
ASS 

BSJ 

V N A , ! 

1 ;> e* a pi 

I 20000 







f 'JMJ MO OCTAL NUMBERS 



U0//.1 000000 P0U12 mop 

04b2 007^2 063001 LDA 1 

0453 00703 001100 ARS 

0454 00704 001100 ARS 

0455 00705 001100 APS 

0456 00706 010717 AND M8K5 
W457 d^d7d7 030716 !0R MSK4 
04b8 00710 014654 J98 OYNA 
04b^ 00711 060001 LDA 1 

0460 00712 310717 AND MSK5 

0461 00713 030716 IOP HSK4 

0462 00714 014654 JSB OYNA 

0463 0071b 124701 JMP P0UT2,! 

0464 00716 000260 MSK4 OCT 260 

0465 00717 0000107 NSK5 OCT 7 
4 6 6 * 

0«67*ENO OF LINE SUBROUTINE 
0468* 

0469 00720 0009100 SOL NOP 

0470 00721 070730 STA AS4 

0471 0072? 060731 LDA CR 

0472 ®V723 014654 JSB OYNA 

0473 00724 060732 LDA LF 

0474 0072b 014634 JSB OYNA 

0475 00726 060730 LDA AS4 

0476 2*727 124720 JMP fcOLrl 

0477 9W73V 000000 AS4 OCT 

0478 00731 000215 CR OCT 215 

0479 00732 000212 LF OCT 212 
0480* 

04Bl*SUPP«tSS 
0482* 

0483 00733 0«)0000- SHPOC 

04 8 4 8 7 54 V) 7 '<* 7 5 ' 

4 H 5 a A ? 3 5 014 14 5 

4 3 6 00 7 3 6 6 17 6 

0487 -667 h7 0020U 

0488 00740 024743 

0489 00741 060730 
M490 00742 124733 



OUTPUT LEAST 
SI8NIFICANT 8 
BITS OF A 

FLAG SET? 

NO. HALT AT ERROR BUFFER 

YES, RESTORE A 

RESTORE B 

FXIT SUBROUTINE 

OUTPUT, PRINT, NO PUNCH 

TEMPORARY STORAGE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 

OUTPUT 
FIRST 
NUMBER 



OUTPUT 
SECOND 

NUMBER 

EXIT SUBROUTINE 



ENTER SUBROUTINE 
STORF A 
CARRIAGE 

RETURN 
LINE 

FEED 
RESTORE A 
EXIT SUBROUIINE 
TEMPORARY STORAGE 



MESSAGE PRINTOUT CHECK SUBROUTINE 



NOP 
STA 

JSB 
LDA 



ASP 

MODE 

BIT2 

SLA,RS9 
JMP *+3 
LDA AS* 
JMP SMPOC, 



ENTER SUBROUTINE 
STORE A 

CHECK Sw. REG. 
SUPPRESS EXCESS 

PRINTING? 
NO. 

YES. RESTOPE A 
EXIT SUBROUTINE 
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PAbE lfv.il 1 #W1 



.- -5 y i cj .4 / 4 3 

* 4 9 2 7 4 -1 

0493 100745 

M 4 9 4 8 7 4 6 

W495 00747 

0496 00750 

4 9 ; * 

049B*fifcSSAGE 
0499* 



0607o0 IDA A3? RESTORE A 

1414751 JSB MPO PRINT MESSAGE 

014720 J9B EOL LINE FEED 

0U720 JSB EOL LINE FEED 

124733 JMP SMPOC,! EXIT SUBROUTINE 

000*00 AS5 OCT TEMPORARY STORAGE 



0500 8075! 

05W1 0075? 

W502 04753 

V 5 tt >5 -4 7 5 4 

tf «J 4 00755 

0505 0075ft 

!d5w6 00757 

0507 00756* 
0508* 
W5B9*PACKE!> 



PRINTOUT SUBROUTINE 
MPO 



000000 
070753 
060000 
034753 
002SX03 
124751 
014761 
024753 



NOP 

ST* 

LOA 

IS* 

S I A , 

JMP 

JSB 

JMP 



•♦1 


*-l 

RSS 
MPO, 1 
PaCO 

*-5 



5I0*MO;»T 
i* 1 1 1 * 
05 12 



ASCI I CHAPAC1EP OUTPUT S 
ITS OF A RE 



0d76l 

0513 00762 

0514 00763 

0515 00764 

0516 00765 
^ibl/ 03/66 
w 3 1 b id id 7 6 7 
e- 5 1 '-> 7 7 s ■'■ 
5 * id id 7 / 1 
10 5 2 1 0077? 
f 5 2 2 0077 3 
1) 2 3 * 

*524*0CTAL 
tA52b* 



SIGNIFICANT (< a 
PACU 



000000 
070773 
001700 
001700 
010455 
014654 
W60773 
1^455 
W 1 4 ft 5 4 
124761 
000000 



ASe 



PRINTOUT OF A 



0526 
0527 

0528 

0529 

0530 

';, 3 1 

0532 

0533 

0534 

K535 

0536 

V.5 37 

5 ,5 b 

05 39 

5 4 if) * 

5 4 1 * N t x r 

5 4 2 * 

054 3 



00774 
00775 
7 7 6 
V6777 

01000 
1 1 4 1 

01H0? 

01003 
01004 
01005 
01006 

01007 

0111 
1 1 1 



000000 
001200 
071010 
011011 

030716 
014654 
015012 
015012 
015012 
015012 
015012 
124774 

000000 
B 3 1 



OPA 



AS7 

"SK6 



f'CT AL 



V 5 4 4 
/■ :> 4 D 
i." D 4 r, 
$ 5 4 7 



01*1? 

/ 1 '■> t .5 
<■■> I / I & 
■fi 1 "'< I *■■ 
15 I •'" 1 f> 



000000 

M 6 1/110 
45 1 ? H 
tf I ? 

t5 ' '> :d) 



CHARACTER 

M X T 



NOP 
STA 
ALF 
ALF 
AND 
JSB 
LDA 
AND 
JSB 
JMP 
OCT 



NOP 
RAL 
STA 
AND 
IOR 
JSB 
JSB 
JSB 
J9B 

jse 

JSB 
JMP 
OCT 
OCT 



AS6 



MSK2 
OYNA 

AS* 
KSK2 
OYNA 
PACO, I 





AS7 

*SK6 

MSK4 

OYNA 

NXT 

NXT 

NXT 

NXT 

NXT 

OPA, I 

I 



ENTER SUBROUTINE 

LOAD A WORD 

WORD « 0? 

YES. EXIT SUBROUTINE 

NO. PRINT THE WORD 

REPEAT FOR NEXT WORD 

UBROUTJNE 

SISTER PRINTEO FIRST. 

ENTER SUBROUTINE 
STORE A 
PRINT 
FIRST 

CHARACTER 

PRINT 
SECOND 

CHARACTER 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 

STORE 4 
PRINT 
FIRST 
NUMBER 
PRINT 
NEXT 
FIVE 

NUMBERS 

EXIT SUBROUTINE 
TEMPORARY STORAGE 



OUTPUT 

^OP ENTER SUBROUTINE 

LDA AS 7 P K E P A R F 

RAL ThE 

RAL NEXT 

RAL NUMBER 
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FAGE 0012 #01 



/o4S 


10 17 


071^10 


ST A 


AS7 


W549 


0i«20 


010717 


AND 


MSK5 


0550 


01«2l 


0307 16 


I OR 


MSK4 


0551 


01^22 


014654 


JSB 


OYNA 


0552 


01023 


125012 


JMP 


NXT, 1 


0553* 










0554* 










t»555* 










0556* 


PUNCH AND READ 


ROUTINE 




0557* 










0558* 


TESTS TAPE PUNCH AND TAPE 


: READER 


5 59* 


BY OUTPUTINS ALL COMBINATIONS OF 


0560* 


EIGHT BITS ANO 


READING THEM BACK 


tf561* 










0562 


1 W 2 4 


000000 


PAP HOP 




0563 


01025 


107700 


CLC 


e,c 


0564 


01026 


006400 


CL8 




0565 


01027 


014461 


JS« 


TOS 


0566 


01030 


025032 


.IMP 


* + 2 


0567 


010 31 


014564 


JSB 


POF 


0568 


1A32 


061216 


LDA 


S17 


0569 


01033 


014733 


JSB 


SMPOC 


0570 


01034 


061036 


LDA 


* + 2 


0571 


011135 


065036 


LOB 


* + l 


0572 


ldlW36 


102O02 


MLT 


2 


05/3 


01037 


061111 


tl) A 


f'lNV 


0574 


01040 


070675 


STA 


OYN 


0575 


01041 


015232 


JSB 


ZEPOS 


0576 


01042 


003400 


CCA 




t*577 


01043 


010455 


AND 


HSK2 


W578 


31M44 


0M654 


JSB 


OYNA 


0579 


01045 


002400 


CLA 




0580 


1 fc 4 6 


015242 


JSB 


.64CH 


05H1 


010 4 7 


015242 


JSB 


.64CH 


0582 


id 1 W 5 


061112 


LOA 


OYY 


058<5 


81051 


07^675 


STA 


OYN 


0bb4 


01*32 


06 7 30 


IDA 


AS4 


W585 


01053 


015242 


JSB 


.64CH 


05t*6 


010 5 4 


015242 


JSB 


.64CH 


05 8 7 


81055 


015232 


JSB 


ZEROS 


WbBtt 


01*56 


015232 


JSB 


ZEROS 


58 9 


01057 


015252 


JSB 


2EROS 


0590 


01«60 


0151 17 


JSB 


PARE 


0591 


01061 


061063 


IDA 


•♦2 


592 


01P62 


065963 


LDB 


**l 


0593 


01063 


102003 


HLT 


3 


0594 


01064 


061116 


LDA 


INN 


0595 


01065 


070675 


STA 


OYN 


0596 


01066 


002400 


CLA 




0597 


01067 


014654 


JSB 


OYNA 


0596 


01^70 


106500 


LIB2 LIB 





0599 


01f*71 


006003 


$Z* t 


,RSS 


0600 


01072 


025067 


JMP 


*-3 


06 1 


1 « 7 3 


015253 


JS& 


P 6 4 C H 


6 2 


1 7 4 


06H13 


L D A 


i YN 


06M3 


010 7 5 


070675 


STA 


Y \< 


8 604 


01«76 


061307 


LDA 


ASH 



FOR 

OUTPUTING 



OUTPUT 

EXIT SUBROUTINE 



ENTER ROUTINE 

INITIALIZE, INTERRUPT OFF 

FLAG SET? 

YES , 

NO.' HALT AT ERROR BUFFER 

PRINT FIRST 

PAR MESSAGE 
HALT TO 
TURN ON 
PUNCH 
PREPARE TO 

PUNCH TAPE 
PUNCH LEADER 
OUTPUT ALL ONES 
AS A BEGINNING 
INDICATOR 
PUNCH 
ALL 

COMBINATIONS 

OF EIGHT 

BITS 



PUNCH 

TRAILER 

E*IT ROUTINE? 
NO. HALT TO 

LOAD TAPE 

INTO READER 
PREPARE TO 

READ 
TAPE 
READ A 

CHARACTER 
CHARACTER « 0? 
YES. «EAD NEXT CHARACTER 
NO. READ FIRST BLOCK 
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0605 


810 7 7 


015253 




JSH 


k f> a C *•; 


0606 


01130 


061 1 14 




ID* 


INY 


0607 


1 l*i 1 


07 067 5 




ST/. 


Y N 


0OW8 


01102 


061307 




IDA 


ASM 


06W9 


01103 


015253 




JS« 


R64CH 


0610 


01104 


0611 15 




L D A 


1 YY 


061 1 


01105 


070675 




ST4 


OYM 


0612 


01 106 


061307 




LDA 


ASH 


0613 


01107 


015253 




JS* 


K 6 A C H 


0614 


011 10 


025127 




JMP 


P7 


H615 


01111 


1 10P100 


N Y 


OCT 


11^000 


0616 


0111? 


13053H0 


oyy 


OCT 


1 31*000 


0017 


01113 


160^00 


i f w 


OCT 


1 6°I000 


061b 


551114 


150000 


INY 


OCT 


i5!'000 


ff-b\9 


011 lb 


170000 


1 YY 


ocr 


i joimv 


0620 


01116 


140000 


INN 


OCT 


\Av>to%Vt 


M>21* 












0ft22* 


PUNCH i 


*ND READ 


EXIT 


SUBROUTINE 


*'i f ? 3 * 












0624 


01 1 17 


000000 


PARK 


NOP 




W625 


01120 


07 1135 




STA 


AS8 


6 26 


01 121 


014145 




JSB 


MO"E 


0627 


01 122 


060200 




LD« 


PIT4 


0626 


0112 3 


002011 




SLA, 


,RSS 


6 2-y 


01 124 


026127 




JMP 


* + 3 


0&313 


01125 


061135 




LDA 


AS8 


0631 


01126 


125117 




.JMP 


PARE, I 


0632 


01127 


060676 


P7 


L 11A 


50 YN 


0633 


01130 


070675 




STA 


OYM 


0634 


01131 


014720 




J SB 


FOL 


0635 


01 132 


061231 




LDA 


SIN 


0636 


01133 


014733 




JSB 


SMPOC 


0637 


01134 


125*24 




JMP 


PAR. 1 


0636 


01135 


1(50000 


ASS 


OCT 





0639* 












0640* 


PRINT OUT ERRORS ROUTINE 




0641* 












0642 


01136 


000(900 


POfc 


NOP 




064 3 


01137 


071 162 




STA 


AS9 


0644 


01 1 40 


060675 




LDA 


OYN 


8645 


01141 


071163 




STA 


AS10 


0646 


01142 


060676 




LDA 


SOYN 


0647 


01143 


070675 




STA 


OYN 


0648 


01144 


014720 




JSB 


EOL 


0649 


01145 


061172 




in a 


S15 


0650 


01146 


014751 




JSR 


MPO 


0651 


01147 


061162 




LDA 


ASP 


0652 


01150 


014774 




JSB 


OP A 


0653 


01151 


061202 




L I) A 


Sift 


0654 


01152 


014751 




JSR 


MPO 


0655 


0U53 


060001 




LDA 


1 


0656 


01154 


014774 




JSH 


OPA 


0657 


01155 


014720 




JSB 


fcOL 


0658 


01156 


061 163 




LDA 


ASJ 


4*1659 


01 157 


07*675 




STA 


OYN 


6 6 


01 160 


0611&2 




I. n a 


A S •■* 


0661 


01161 


125136 




JMP 


POF, ' 



"r. Ail '5trON[i *LOCK 



READ THIRD BLOCK 



READ FOURTH BLOCK 
FX!T ROUTINE 
0UTPIJT,N0 PRINT, PUNCH 
OUTPUT, PRINT, PUNCH 
INPUT, PRINT, NO PUNCH 
INPUT, NO PRINT, PUNCH 
INPUT, PRINT, PUNCH 
INPUT, NO PRINT, NO pifNf; 



ENTER SUBROUTINE 
STORE A 

CHECK SW. RFS. 
EXIT THIS 

ROUTINE? 
YES. 

NO. RESTORE A 
EXIT SUBROUTINE 
RESTORE 

OUTPUT COPE 
LINE PEED 
PRINT SECOND 

PAP MESSAGE 
EXIT ROUTINE 
TEMPORARY STORAGE 



ENTER 
STORE 
SAVE 
STATE 



SUBROUTINE 
A 



LINE FEED 

PRINT "OUTPUT «" 

RESTORE A 

PRINT OCTAL NUMBER 

P « I N T "INPUT - " 

PRINT OCTAL 

NUMBER 
LINE FEED 
RESTORE 

STA1T 
R F S T R E A 
r x I T SUBROUTINE 
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0662 
0b63 
0664 



0665 

0666 
0667 



0668 

whey 

06 7 



0671 
0672 

0673 



06/4 
0675 
0676* 
067 7* 

0678* 

0679 

0660 

0681 

0662 

0683 

0684 

0685 

0686 

0687* 

0688* 

0f>89* 

0690 

0691 

0692 



01 \ 6? 

0H64 

01165 
01166 
01167 
01170 
01171 
3117 2 
01173 
01174 
01175 
0117 6 
01177 
01200 
01201 
01202 
01203 
0120 4 
01206 
01206 
01207 
1 2 1 e- 
01211 
01212 
01213 
01214 
01215 
01216 
0121? 
01220 
01221 
01222 
01223 
01224 
01225 
01226 
01227 
01230 
01231 



t) 
000000 

047S25 
052120 
052524 
020*75 
200 4 

000000 
061 164 
020040 
020040 
044516 
0501.25 
052040 
036440 
000000 
061173 
041105 
04351 1 
4 7 * A 
050125 
047103 
044040 
0*0516 
4 2 » 4 
051 105 
040504 
000000 
061203 
042516 
042040 
050125 
047103 
044040 
040516 
042040 
051105 
040504 
000000 
061217 



AS10 

00 



SI5 

1 



SI6 

PARMi 



SI7 

PARM2 



518 



OUTPUT BLANK TAPE 



012 5? 
1233 
01234 
01235 
01236 
01237 
01240 
01241 



K> tl 

002400 

065241 

014654 

006006 

025235 

125232" 

177741? 



ZEROS 



SC3 



C T v" 
OCT 
ASC %mjTPUT 



OCT 
LP A 



TfMPOwAHY STORAGE 
TEMPORARY STORAGE 



OCT tt 
L D A 
ASC 6, 



INPUT 



OCT 

LDA 01 

ASC 10,8FGTN 



PUNCH AND REAP 



OCT 
LDA PARMI 
ASC 9, END 



PUNCH AM!) REAP 




PARM2 



NQR 
CLA 

LDP 

JSP- 

INB, 

JMP 

JMP 

OCT 



SC3 

OYNA 
S/'R 
*»2 
ZEROS, I 

177740 



ENTER SUBROUTINE 



OUTPUT 7ER0 

32 ZEROS? 

MO. 

YES. EXIT SUBROUTINE 



INCREMENT AND OUTPUT 4 REG,, 64 TIMES 



01242 000000 

01243 065252 

01244 0145r>4 



.64CH 



!v P 
t DP 



sea 



ENTER 
RESET 



SUBROUTINE 
COUNTER 



J SB OYNA 



OUTPUT a 
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K A ij fc !r5 3 !. 5 #01 



W b 9 3 


it I ? 4 f > 


? 5) 4 




INA 




INCREMENT OUTPUT WORD 


06 94 


01246 


006*506 




INR 


,SZB 


64 CHARACTERS? 


0695 


31247 


025244 




JMP 


*-3 


NO. 


0696 


01250 


014720 




JSB 


EOL 


YES. 


0697 


/1251 


125242 




JMP 


.64CH, I 


FXIT ROUTINE 


0698 


&1?52 


177700 


SC4 


OCT 


177700 




06 99* 














BI7fc)W* 


RfcAn «ND CHECK 


64 CHARACTERS 




0701* 














0702 


01253 


000000 


R64CH 


NOP 




ENTER SUBROUTINE 


0703 


01234 


065252 




LDB 


SC4 


RESET 


0704 


01255 


075306 




STB 


M64 


CHARACTER COUNTER 


0705 


01256 


014654 


P8 


JSB 


OYMA 


READ A 


0706 


01257 


106500 


LIB3 


LIB 





CHARACTER 


$7w7 


0126^ 


015) 17 




JSB 


PARE 


EXIT ROUTINE? 


07 08 


251261 


050001 




CPA 


1 


NO. ERROR? 


0709 


01262 


025264 




JMP 


•♦2 


NO. 


7 1 t< 


01263 


015136 




JSB 


POE 


YES. PRINT OUT ERROR 


^l i 


1 2 6 4 


002004 




INA 




INCREMENT REFERENCE 


0712 


0126b 


035306 




IS? 


M64 


64 CHARACTERS? 


0713 


SO 1266 


025256 




JMP 


P8 


NO. 


0714 


01267 


071307 




STA 


ASH 


YES. STORE A 


0715 


01270 


060731 




LD* 


CR 


CHECK FOR 


0716 


01271 


0146^4 




JSB 


OYNA 


CARRIAGE 


0717 


01272 


106500 


Llb4 


LIB 





RETURN 


0718 


01273 


050001 




CPA 


1 


ERROR? 


0719 


01274 


025276 




JMP 


**2 


NO. 


0720 


01275 


015136 




JSP 


POE 


YES. PRINT OUT ERROR 


0721 


01276 


060732 




LUA 


LF 


CHECK FOR 


0722 


01277 


014654 




JSB 


OYNA 


LINE 


0723 


01300 


106500 


LIB5 


LIB 





FEED 


0724 


01301 


050001 




CPA 


1 


ERROR? 


07 2 5 


1302 


025304 




JMP 


**? 


NO. 


07<!6 


01303 


015136 




JSB 


POE 


YES. PRINT OUT ERROR 


$727 


01334 


061307 




LDA 


AS1 1 


RESTORE A 


0728 


013 45 


125253 




JMP 


R64CH, I 


EXIT SUBROUTINE 


0729 


31306 


177700 


M64 


OCT 


177700 




0730 


01307 


00(1000 


AS11 


OCT 





TEMPORARY STORAGE 


0731* 














0732* 














0733* 














0734* 


PKHT AND KEYBOARD ROUTINE 




<*735* 














07 36 


01310 


000000 


PAK 


NOP 




ENTER ROUTINE 


%7S7 


1 1 3 1 1 


107700 




CLC 


0,C 


INITIALIZE, INTERRUPT OFF 


0738 


01312 


060676 




LDA 


SOYN 


PREPARE 


0739 


13 13 


070*75 




STA 


OYN 


TO PRINT 


07 40 


» 1 3 1 4 


061371 




LDA 


S!9 


PRINT FIRST 


W7 4 1 


01315 


014733 




JSB 


SMPOC 


PAK MESSAGE 


0742 


01316 


015432 




JSB 


PRALL 


PRINT b4 ASCII CHARACTERS 


0743 


01317 


015432 




JSB 


PRALL 


PRINT 64 ASCII CHARACTERS 


07 4 4 


01120 


014720 




JSB 


EOL 


LINE FEED 


0/4 5 


13 21 


015 3 4 




JSB 


PAKE 


EXIT ROUTINE? 


^74 6 


.sl:S22 


061 414 




LDA 


SI 1 


NO. PRINT SECOND 


W/47 


13 2 3 


014733 




JSB 


SMPOC 


PAK MESSAGE 


0748 


01324 


06 1H6 


P9 


LD* 


INN 


PREPARE TO READ 


0749 


01325 


102600 


0TA5 


OTA 





IN FROM KEYBOARD 
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V) / b v 

v.-'/oi 

0752 

0753 

0754 

0755 

0756 

0757 

0756 

0759 

0760* 

0761* 

7 6 2 * 

#7tZ 

0764 

0765 

0766 

0767 

0768 

7 69 

V776 

a/7 1 

07 7 2 

W773 

07 7 4 

7 7 6 



Ki 1 J 2 
8133 
0133 

a 133 

to I 33 
0133 
8133 

0133 
fell 33 



15 3 4 
1B3700 
1406430 
0M461 
025334 
H2S326 
1065130 
060001 
014664 
026324 



Pl*5 
STCC3 



LIB6 



JSB 
STC 
CLB 
JSB 
JMP 
JMP 
LIB 
LDA 
JSB 
JMP 



PAKE 
k),C 

TOS 
*♦? 

e 

i 

GYNA 

pg 



PRINT ANC KEYBOARD EXIT 



0776 
0777 

0778 



ic« 7 7 9 



1 3 4 
01341 
01342 
413 43 
01344 
01545 
01146 
tf 1 !! 4 7 
01350 
013 51 
451352 
01353 
H1354 
01355 
01356 
01357 
01360 
01361 
01362 
01363 
01364 
01365 
01366 
01367 
01370 
01371 
01372 
01373 
01374 
01375 
01376 
01377 

131400 
01401 

01402 
01403 
01404 
014515 
01406 
01407 
1 4 1 13 
1411 
01412 
1 '! ] 3 



000000 

071162 
014145 

060201 
002011 
025350 
061 162 
125340 
014720 
061431 
0U733 
125310 
041 105 
043511 
047040 
050122 
044516 
052040 
040516 
042040 
045505 
054532 
0475«l 
051104 
000000 
061354 
052523 
042440 
045505 
054502 
047501 
051 104 
020123 
046117 
053514 
054440 
024065 
020103 
044123 
027B57 
051505 
04 1456 
2 4 4 4 
51 vD 



PAKE 



NOP 
STA A89 

JSB MODE 
Lb A BITS 
SLArfSS 

JMP **3 



PAKM1 



I. DA 
JHP 
JSB 
LDA 
JSB 
JMP 
ASC 



A SO 

PAKE, I 
E.OL 
Sill 
SMPOC 
PAK, I 
12, BEG 



OCT 
SI9 LDA PAKM1 
PAKM2 AST 17, USE 



EXI 

NO. 
F 
ANY 
YES 
NO. 
LOA 
PUT 
OUT 
REA 



T ROUTINE? 

WAIT 

OR INPUT 

INPUT? 



D HATA INTO B 

B INTO A 
PUT A 
D NEXT CHARACTER 



ENTER SUBROUTINE 
STORE A 

CHECK SW, RES. 
EXIT THIS 

ROUTINE? 
YES. 

NO. RESTORE A 
EXIT SUBROUTINE 

PRINT THIRD 

PAK MESSAGE 
EXIT ROUTINE 
IN PRINT AND KEYBOARD 



KEYSOARO SLOWLY (5 CHS./3EC.) 



OCT 
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PAUE 0sd 1 7 #01 



0780 
07 81 



01114 
f- 1 4 I h 
Ml 4 t 6 
4 1 4 t 7 
14 2 
01421 
01422 
01423 
01424 
01425 
31426 
014?7 

iai'5 10 

1 4 3 1 



061372 
04^-516 
042,140 
0biM22 
044516 
052040 
040"516 
0422140 
345535 
054532 
(347 5^1 
S 11 -3 4 
000000 
061415 



SI1R 
PAKM3 



07 82 

0783 01431 061415 Sill 

7 8 4 * 

0785*PKlNT ALL CHARACTERS 

0786* 

000000 PRALL 

061440 

015442 

061 441 

015442 

12*432 

000300 SCS 

000240 SC6 



0787 

**/«8 

« / a y 

7 9 

0791 

0792 

0793 

0794 

0795* 

W796*PKlNr 

07 97* 



01432 
01433 

1434 

0143b 
0143^ 
01437 
014 4 
01441 



IDA 

ASC 



PAKM.2 
11, END 



PRINT AND KEYBOARD 



OCT 
LDA PAKM3 

SUBROUTINE 

NOP 
LDA SC5 
JS8 
LDA 
JSB 
JMP 
OCT 
OCT 



.32CH 

SC6 

.32CH 

PRALL, I 

300 

240 



32 CHARACTERS SUBROUTINE 



H798 
0799 
0800 
0801 
0802 
0803 
0804 
0605 
0806 
0807 
0808 
0609 
* * 



*3i44? 
01443 
01444 
01445 
01446 
01447 
01450 
01451 
01452 
01453 
01454 




07b4b4 
06524 1 
014ft54 
002004 
006006 
025445 
014720 
069454 
125442 
000000 



,32CH 



882 



NQP 

STB 

LOB 

JSP 

INA 

INB,SZS 

JMP * - 3 



BS? 
SC3 
V N A 



NO tRRORS* 



JSB 
LDP 
JMP 
OCT 
END 



EOL 
BS2 

,3?CH, 1 




ENTER SUBROUTINE 
PRINT FIRST 

LINE OF CHARACTERS 
PRINT SECOND 

LINE OF CHARACTERS 
FXIT SUBROUTINE 



ENTER SUBROUTINE 

STORE R 

RESET COUNTER 

PRINT A 

INCREMENT A 

32 CHARACTERS? 

NO. PRINT NEXT CHARACTER 

YES. LINE FEED 

RESTORE B 

EXIT SUBROUTINE 

TEMPORARY STORAGE 
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2116A BUFFERED 
TELEPRINTER TEST 



Binary Tape - HP2 417B 
Source Listing- HP2 0H17BL 



■1-/-2- 



20417B 

PAGE fcikUl 



UltfUl ASfiB,A,B,L 

** NO ERRORS* 



-3-/-4- 



PAGE 00vi2 #0 1 



id 1 
if> 2 * 
0003* 
0004* 
0005* 
00 06* 
7" 
0tf»8* 
0009* 
010* 
fltsl i* 
K ■ 1 2 * 

t4 1 4 * 
0015* 
w 1 b * 
i" 1 7 * 
0fcl 6* 
k; ] 9 * 
0020* 
0021* 
022* 
002 3* 
0024* 
00 2 5 
0026 
0027 
0028 
0029 
0ii>3 
0031 
00 32 
W 3 J 
W 3 4 
0M3 5 
0fo3 6 
00 3 7 
0w3 6 
0039 
0M40 
0W4 1 
00 4 2 
00 4 3 
04244 
00 4 6 
0046 
0047 
004 8 
00 4 9 
0050 

00 51 

0052 
0053 
00b4 
00b5 
0i)b6 

0057 



ASMB, A , B,L 



BUFFERED TELETYPE DIAGNOSTIC 



100 



SIARTING UCTAL ADDRESS « 

* # * 

TmE FOLLOW IMG SWITCH REGISTER 
ARE USED FDR PROGRAM CONTROl 



SETTINGS 



81 T 

8i r 

Hi 1 

Bl i 

hi r 

* * * 




1 

2 
3 
4 
f. 



- > 

m> 



M A 1 N P RT5 3 R A fl 



0kN77 
00'177 
00100 

001 14 1 

001 k il2 

1 3 

001 04 
001 s4b 
001 M6 
00107 
00110 
00111 
00112 
00113 
001 14 
00 11b 

1 i 6 

001 17 
04I2C 
00121 
00122 
00 1 33 
00124 
0012b 
00126 
00127 
00130 

uai3i 

00 1 :53 
00134 

00135 
00136 



102300 
107700 
102501 
010141 
979777 
014203 
064142 
060143 
0701U 
060144 
070010 
034111 
002004 
6 W 6 
024111 
6 4 A\ 
070«00 
014720 
060123 
064123 
102001 
014145 
060177 
000010 
014300 
014145 
060200 
000010 
1 S Q 2 4 
014145 
0602/11 
000310 



HALT AT BE GINK 
HALT AT ERROR 
SUPPRESS MES8A 
PERFORM BASIC 
PERFORM PUNCH 
Pfc RFORM PRJMT 



END 



STAi 



MP1 



R G 
HLT 
CLC 
Ll» 
AND 
ST* 
J SB 
LDP 
LD4 
STA 
I..DA 
STA 
IS? 

1 N A 
IMP, 
JMP 
IDA 

STA 
JS» 
LDA 
LDB 
HLT 
JSB 
LOA 
SL* 

jse 

JSB 
LDA 
SLA 
JSH 
JSB 
LDA 
SLA 



77w 

ps 

0,C 
1 

MJ>«0 
PT A 
IN IT 
fb7 
HIS 

* + 2 
HI 
10P 
*-1 

SZP 
*-4 
I I T 

ECU. 

* + 2 
*♦! 
1 

MODE 
BIT3 

BT 

MODE 
PIT4 

PAR 
P-OHE 

Bl r5 



1NG OF PROGRAM 

BUFFER 

GE PRINTOUT 

TEST ROUTINE 

AND READ POUT INF 

AND KEYbOARH ROUTINE 



INITIALIZE'.* INTERRUPT OFF 
PUT TTY 
ADDRESS 

INTO ALL I/O 
INSTRUCTIONS 
PREPARE 
TP AP 
F'"'P 

ILLEGAL 

INTERRUPT 
FROM 

ANOTHEW 
DEVICE 

PkEPAWE ILLFSAL TTY 

INTERRUPT TPAP 
LINE FEED 
HALT TO CHOOSE 

SWITCH REGISTER 
OPTIONS 
CHECK SW. REG. 
PERFORM 

BASIC TEST? 
YES. 

NO, CHECK SW. REG. 
PhRF'ORfi 

PUNCH AND R K. A p ? 
YES. 

MO. CHECK S W . ft E G . 
PERFORM 

PRINT AND KEYBOARD? 
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KAGt 00^3 *<dl 



0058 

0059 

0060 

00 61 

0062 

0063 

fri»04* 

li 6 6 * 

0066* 

i!» b 7 * 

0Wb8 

0k? 6 9 

0070 

0M71 

0072 

01*73 

0W74 

0»76 

0itf/6 

\S<d77 

0^78 

0k)7 9 

01460 

0fc>6l 

0K62 

0tf»3 

0084 

ww&b 

0»86 
00B7 

0068 

<<H)'-*1 
0K92 

0Q3 
0^94 
0W96 
0096 
0097 
0098* 
0099* 
0100* 

1 1 * 
102* 
1l«,3* 
(<5104* 

i D * 
010 6 
01M7 
0108 
01149 

01 10 
Wl 1 1 
0112 
1 13 
0114 



001 5/ 
001 40 
00141 
00142 
00143 
00144 



013 310 
024124 
000077 
177711 
0/0310 
102010 



WSK0 
M67 
HIS 
HI 



JSP 
JMP 
OCT 
OCT 
STA 
HIT 



PAK 
MP) 
77 
1/771 

10R 
10H 



YES. 

NO. 



SWITCH REGISTER MONITORED 
FOR CURRENT OPERATING MODE 



0*)) 4b 
0014 6 
001 47 
00160 
00161 
00162 
00163 

0164 
00165 
0016 6 

001 67 
016 
00161 
0016? 
00163 
00J 64 
0016b 
M0J 66 
00167 

id \ 7 1' 
00171 

001 72 

17 3 

001 74 

1. 7 5 

001 76 
001 77 
00?n0 

:? 1 

00202 



000000 
0701 73 
1026*11 
07^1 74 
I 3 
070175 
0133 
0751176 
00 1300 
070177 
001 300 
7 A ? A 
13 

0702i3t 

060174 
002011 
0241 71 

06tf?)2 
064202 
024977 
06^173 
124145 
000000 
000000 
003000 

000800 

0000*00 
000300 
000«00 
0001 00 



MODE 



ASH 

dITB 

bill 

HIT2 
bl 13 

Ml 14 

B I Tb 

hA L' 



NOP 
STA 

L I A 
STA 

WAR 

STA 

RA» 

STA 

RAP 

STA 

(•■AR 

STA 

RAR 

STA 

LDA 

SLA, 

JMP 

ltia 

LDP 

JMP 

iiia 

JMP 
OCT 
OCT 
OCT 
OCT 
OCT 
OCT 
OCT 
OCT 



ASM 

1 

BIT8 

HIT! 

HIT2 

BIT3 

HIT4 

6IT5 
BIT0 

^SS 
* + 4 
hAI> 
HAH 
ENn 
AS'l 

MOnE, 



PI 





1 tf M 



INITIALIZATION KOUriNf. 

THIS ROUTINE ALIUS THE BUFFERED 
ALL I/O INSTRUCTIONS. 



02-^3 
2*4 
002 6 
? f i 
2 a 7 
k) :> l 
tf 4 -M 1 
kl ? 1 2 

■> 1 3 



00 0-00 
107 7 00 
014?70 
102300 
07 0332 
7 3 4 1 
7 ■<• 3 b 1 
07*3/3 
7 /t 4 -> 2 



1NIT 



NOR 
CL.C 
J SB 
SFS 

STA 

STA 
STi 
ST* 
ST* 



AU IN 

I" 

SFS1 

SPR? 

S F S 3 

SFS4 

SFS 5 



ENTER SUBROUTINE 
STORE A 
EACH BIT 
FROM THE 
SWITCH REGISTER 
IS ROTATED 
INTO THE 
LEAST SIGNIFICANT 
POSITION AND 
STORED IN THE. 
STORAGE LOCATION 
BEARING ITS NAME 



AT BEGINNING 
PROGRAM? 



A AND B 



HALT 
OF 

NO. 

ves. load 

WITH 100 
AND HALT 
RESTORE A 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



TELETYPE ADDRESS TO 



ENTER ROUTINE 
INITIALIZE, INTERRUPT 
PUT TTY ADDRESS 

INTO SFS INSTRUCTIONS 



OFF 
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H A G t. 00'/ 4 #01 



1 15 


00^14 014270 


JSB 


ADIN 


PUT TTY ADOkESS 


01 lb 


00215 1022013 


SFC 





INTO SFC INSTRUCTIONS 


0117 


00216 070326 


STA 


SFC1 




0118 


00217 070336 


STA 


SFC2 




m;9 


0'"220 070346 


STA 


SFC3 




01213 


00221 070367 


STA 


SFC4 




0121 


00222 014270 


JSB 


AOIN 


PUT TTY ADDRESS 


0122 


00223 102600 


OTA 





INTO OTA INSTRUCTIONS 


(»t 2 3 


0022* 070407 


STA 


0TA1 




0124 


00226 070442 


STA 


0TA2 




0125 


00226 070661 


STA 


OTA 3 




0126 


00227 070664 


STA 


OTA 4 




ei27 


00230 071325 


STA 


0TA5 




W12B 


00231 014270 


JSB 


ADIN 


PUT TTY ADDRESS 


0129 


00232 103700 


STC 


0,C 


INTO STCrC INSTRUCTIONS 


0130 


00233 0704U 


STA 


ST0C1 




0131 


00234 070665 


STA 


STCC2 




0132 


00235 071327 


STA 


STCC3 




0133 


00236 014270 


JSB 


AOIN 


PUT TTY ADDRESS 


0134 


00237 106700 


etc 





INTO CLC INSTRUCTION 


0130 


00240 070412 


STA 


CLCl 




013 6 


00241 014270 


JSB 


ADIN 


PUT TTY ADDRESS 


013 7 


W0242 102700 


STC 





INTO STC INSTRUCTION 


W13 8 


42 43 7 vi 3 4 5 


STA 


STri 




13^ 


iirl ? 4 4 fej 1 4 ? ? 


JSB 


AOIN 


PUT TTY ADDRESS 


W 1 4 V» 


2 4 6 10 3 I '1 


CLP 


i'i 


INTO CLF INSTRUCTION; 


014 1 


flrf?46 070339 


STA 


CLFl 




Ml 42 


00247 014270 


JSB 


ADIN 


PUT TTY ADDRESS 


14 3 


00250 102100 


STF 


(4 


INTO STF INSTRUCTION 


144 


014251 070360 


STA 


STF1 




014b 


00252 014270 


JSB 


ADIN 


PUT TTY ADDRESS 


14 6 


00253 106500 


LIB 





INTO LIB INSTRUCTIONS 


W 1 4 7 


00254 370443 


STA 


LIH1 




1 4 b 


00^55 071070 


STA 


LIB? 




14 9 


0025* 071257 


STA 


L1H3 




01 bfc 


00257 071272 


STA 


LI«4i 




W 1 6 1 


00260 071300 


STA 


LIBS 




162 


00261 071334 


STA 


LI«6 




153 


00?fi2 01427* 


JSB 


ADIN 


PUT TTY ADDRESS 


154 


0W263 070000 


STA 





INTO STA INSTRUCTIONS 


i/- 155 


00264 070117 


STA 


STA1 




166 


0ifl265 070356 


STA 


STA2 




'§157 


00?66 070366 


STA 


ST A 3 




0158 


00267 124203 


JMP 


I N ! T , I 


EXIT ROUTINE 


16 9* 










16 0* 


ADDRESS INCLUSION SUBROUTINE. 




0161* 


THE BUFFERED TTY ADDRESS 


IS PUT 


INTO 


0162* 


THE INSTRUCTION 


i FOLLOWING JSfc* ADIN. 


163* 










016 4 


00270 »00000 


ADIN NOP 




ENTER SUBROUTINE 


165 


0W271 160270 


IDA 


A D I N , I 


BRING I/O INSTRUCTION INTO A 


0166 


00 2 72 01*1276 


AND 


MSK1 


ADD TTY ADDRESS 


0167 


00273 030277 


IOR 


BTA 


TO INSTRUCTION 


16B 


00274 034270 


IS? 


A D I N 


EXIT 


1 h 9 


4 2 7 6 1 2 4 2 1 V) 


JKt* 


A U I N , I 


SU8 p 0UT INK 


0170 


16 A ? 7<r: 17 7 7 .1 B 


I- SKI OCT 


1 777 01* 




0171 


10 2 7 7 w 


BTA OCT 





TTY ADHRESS STORAGE 
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PAGE 0005 #01 



0172* 
0173* 
0174* 
H175* 
fe>17b* 
G177* 

a 1 7 8 * 

f 1/9* 

esittia 

kJl bl 
0162 
0183 
0184 
0185 
018b 
018/ 
0188 
0189 
1 9W 
019 1 
fei92 
0193 

0194 

0195 

0196 

0197 

0198 

0199 

0200 

0201 

0202 

0203 

0204 

020b 

0206 

0207 

0206 

0209 

0210 

0211 

0212 

0213 

0214 

0215 

0216 

0217 

0218 

0219 

9229 

0221 

0222 

0223 

Bi>24 

0225 

0226 

0227 

0228 



BASIC TEST ROUTINE 

THE FOLLOW I NQ TESTS 
ANU INTERRUPT CIHCUI 



00300 

00301 

00502 

00303 

3 v> 4 

003iib 

00306 

00307 

310 

A 3 1 1 

.5 1 2 

3 13 

303 14 

083 IS 

00316 

00317 

00320 

00321 

00322 

00323 

00324 

00326 

00326 

00327 

00330 

00331 

00332 

00333 

00334 

00335 

00336 

00337 

00340 

0034 1 
00342 
00343 
00344 
00345 
3 4 6 
00347 
00350 
00351 
00352 
00353 
00 3 54 
00355 
00356 

0035 7 
00360 



000000 

107700 

060676 

070675 

060621 

014733 

006400 

074570 

074571 

074572 

074573 

074574 

074575 

074576 

074577 

074600 

074601 

074602 

0746513 

0746*14 

074605 

006004 

102200 

024331 

074570 

006004 

102300 

074571 

006004 

103100 

1022^0 

074572 

006004 

102300 

024344 

074573 

006004 

102700 

102200 

074574 

006004 

102300 

024354 

074575 

006;ti*4 

6 4 

7 00 
102100 

102100 



BT 



SFC1 



SFSl 



CLF1 
SFC2 



SFS2 



STC1 
SFL3 



SFS3 



STA2 
STF 1 



THE 
TKY 

NOP 

CLC 

LDA 

STA 

LPA 

JSh 

CL8 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

STB 

1N8 

SFC 

JMP 

STB 

INB 

SFS 

STB 

INB 

CLF 

SFC 

STB 

INB 

SFS 

JMP 

STB 

INB 

S T C 

SFC 

$ TB 

INB 

SFS 

JMP 

STB 
INB 
LDA 

STA 
STF 
STF 



FLAG, CONTROL, 



0»C 
SOYN 
OYN 
SI 1 

SMPOC 

El 

E2 

E3 

E4 

E5 

E6 

£7 

ElPi 

Ell 

E12 

El 3 

E14 

E15 

IA 



*+? 

El 



F.2 


V< 
E3 



* + ? 
t4 


h 
F5 

1/1 
*+? 

Eb 

) 1 1. 
\" 

c 



INITIALIZE, INTERRUPT OFF 
RESTORE 

OUTPUT CODE 
PRINT FIRST 

AT MESSAGE 
CLEAR 

ERROR 
BUFFER 



INCREMENT ERROR CODE 
FLAG CLFAR? 

NO, 

YES. ERROR 1 

INCREMENT ERROR COKE 
FLAG SET? 

NO. ERROR 2 

YES. 
CLEAR FLAG 
FLAG CLFAR? 

NO. ERROR 3 

YES. 
FLAG SET? 

NO. 

YES. ERROR A 

SET CONTROL 
FLAG CLEAR? 

NO. ERROR S 

YES. 
FLAG SET? 

NO. 

YES, ERROR 6 

PREPARE To TEST 

INTFKRIJPT SYSTEM 
TURN ON INTERRUPT SYSTb> 
SfcT FlAO 
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(5229 
0230 
65231 
0232 

0233 
0234 

0235 
0236 

0238 

0239 

02 4 

02 4 1 

0242 

0243 

024 4 

02 4 5 

024 6 

24 7* 

2 4 8 * 

0249* 

0250 

02 51 

0252 

0253 

0254 

0255 

0256 

0257 

0258 

02 69 

0260 

0261 

02f>2 

0263 

0264 

0265 

0266 

0267 

0266 

0269 

0270 

0271 

0272 

0273 

0274 

0275 

0276* 

0277* 

0278* 

02 7 9 

0260 

02 Ml 

0282 

0283 

02»4 

0285 



00361 
00362 
00363 
00364 
00365 
00366 
00367 
00370 
00371 
00372 
00373 
80.174 
00375 
03 7 6 
00377 
00400 
00401 
00402 



000000 
000000 
074576 
006004 
060401 
070000 
102200 
024372 
074577 
006004 
102300 
074600 
006004 
074402 
024403 
0243o4 
014503 
000000 



PI 

STA3 
SFC4 



SFS4 



I J 1 

I IJ 

ERNO 



NOP 
NOP 
STB 
INB 
LDA 
STA 
SFC 
JMP 
STB 
INB 
SFS 
STB 
INB 
STB 
JMP 
JMP 
JSB 
OCT 



£7 

I I J 



* + ? 

E 10 



en 

ERNO 
TOUT 
PI 
ILINT 





WAIT F'.IR 

I M T f- t-RUPT 
MO INTERRUPT - ERROR 7 
INTERRUPT ENTRY 
RENE* ILLEGAL 

INTERRUPT TRAP 
FLAG CLEAR? 
NO. 
YES. ERROP 10 

FLAG SET? 

NO. ERROR 11 

YES. 
STORE ERROR CODE 



ERROR CODE STORAGE 



THE FOLLOWING TESTS THE TIME FOR OUTPUTING ONE CHARACTER 



00403 
00404 
00405 
00406 
00407 
00410 
0041 1 
00412 
034 13 
00414 
00415 
00416 
00417 
00420 
00421 
00422 
00423 
00424 
00425 
00426 
00427 
00430 
00431 
00432 
00433 
00434 



000000 
107700 
102100 
060432 
102600 
064433 
103700 
106700 
0144nl 
024416 
024420 
064402 
074601 
034402 
000000 
064434 
0144bl 
024427 
064402 
074602 
034402 
000000 
024435 
100000 
14?{5i30 
176700 



TOUT 



T A 1 

STCC1 
CLC1 



QNN 

T0C1 

T0C2 



NOP 
CLC 
STF 

LD* 
OTA 
LDB 
STC 
CLC 
JSB 
JMP 
JMP 
LDB 
STB 
ISZ 
NOP 
LDB 
JSB 
JMP 
LDB 
STB 
IS7 
NOP 
JMP 
OCT 
OCT 
OCT 



0,C 



ONN 



T0C1 

0,C 



T03 

* + ? 
*+3 
ERNO 
E12 
ERNO 

T0C2 
TOS 

* + 3 
ERNO 
tl3 
ERNO 

DT 

100000 
142000 
176700 



INITIALIZE, INTERRUPT 

INTERRUPT Oh 

PUT INTO OUTPUT, NO 

PRINT, NO PUNCH MODE 
CHECK 

LOWER 
TIME 
FLAG SET? 
YES. DATA 
NO, 
ERROR 12 



OFF 



LIMIT 



CLOCK TOO FAST 



INCREMENT ERROR 
CHECK UPPER 

TIME LIMIT 
FLAG SET? 
YES. TIMING OK 
NO. DATA CLOCK 

ERROR 13 
INCREMENT ERROR 



CODE 



TOO SLOW 



c o n e 



OUTPUT, NO PRINT, NO PUNCH 
TIMEOUT CONSTANT 1 
TIMEOUT CONSTANT 2 



THE FOLLOWING TESTS THE EIGHT BIT DATA BUFFER. 



004 35 
00436 
00437 
00440 
00441 
00442 
00443 



000000 
107700 
002400 
070407 
010455 
102600 
106S00 



LIT 



P2 



0TA2 
Lib! 



NOP 
CLC 

CLA 
STA 

AND 
OTA 
LIB 



P. ,C 

CURWi) 
MS* 2 



INITIALIZE, INTERRUPT OFF 

OUTPUT TNf 
CURRENT 

* o r n 
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0286 
0287 
fc>288 

0290 
0291 
0292 
0«?93 

02 9 4 
Id 2 9b 
0296 
0297 
0298 
0i(99* 
0300* 
0301* 
0302* 
0303* 
3 /> 4 * 
3 5 * 
to 3 to 8 
j07 
0308 
0309 
10310 
Bill 
0312 
0313 
0314 
0315* 
d31ft* 
0317* 
0318 
0319 
032W 
0321 
0322 
03?3 
032 4 
032 b 
0326 
w327* 
0328* 
0329* 
330* 
0331* 
0332 
0333 
0334 
0335 
0336 
0337 
0338 
0339 
0340 

03 4 1 

3 4 2 * 



00444 
00445 
00446 
00447 
0045P 
00 4 51 
03452 
00453 
00454 
004 55 
00456 
00457 
00460 



050001 
024450 
0604.32 
070603 
060457 
002006 
024440 
014472 
024515 
000377 
000200 
000300 

000000 



P3 



CPA 
JMP 
LDA 
STA 
LDA 



1 

H3 

ERNQ 
£14 

CURWO 



INA,SZA 
JMP P2 



MSK2 
MS*3 
OURwD 
NBP 



jsb 

JMP 
OCT 
OCT 
OCT 
OCT 



E8H 

FOOT 

377 

200 



pi 



FLAG TIMEOUT SUBROUTINE 



TIMEOUT CONSTANT IN 8 

IF "FLAG" BEFORE TIMEOUT, EXIT TO 

EXIT TO TOS + l. ONE ITERATION ■ 



00/161 
00462 
00463 
00454 
00465 
00466 
00467 
00470 
004?1 



000000 
102300 
024465 
124461 
006i»06 
024462 
0344oi 
000000 
l244ol 



ros 

SFS5 



N0 P 

SFS 

JMP *+? 

JMP 10S,T 

INB,bZB 

JMP SFS5 

IS/? TOS 

NOP 

JMP TOS, I 



ERROR BUFFER HALT SUBROUTINE 



004 7 2 
00473 
0KI474 

00475 
00476 
00477 
00S00 
00501 
00502 



000(400 

7 0-5^2 
0141 45 
060175 

000010 
0143-S4 
060502 
124472 

0007100 



fcBH 



AS1 



NOP 




STA 


A3t 


JSB 


mooe 


LP A 


mi ri 


SLA 




JSR 


POF 


LDA 


AS1 


JMP 


EBH, 1 


OCT 






INPUT « OUTPUT ? 

YES. 

NO. FRROR 14 

INCREMENT 

CURRENT WORD 

HALT AT ERROR BUFFER? 
NO. 



TOS. IF NOT, 
6.4 MICROSEC. 

ENTE* SUBROUTINE 
FLAG SET? 

YES. EXIT THROUGH TOS 
NO. TIMEOUT YET? 
NO. REPEAT 
YES. EXIT 
THROUGH 
TOS ♦ I 



ENTER SUBROUTINE 
STORE A 

CHECK SW. RED. 
HALT AT 

ERROR BUFFER? 
YES. 

NO, RESTORE A 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



ILLEGAL INTERRUPT SUBROUTINE 

FOR AN ILLEGAL TTY INTERRUPT, THE PROGRAM ADDRESS IS SAVED. 



00503 000000 ILIMT NOP 



00504 
00505 
00506 
5 4 7 
0051 
00'.ill 
512 
«S | 3 
005t4 



7 05 1 3 
060543 

070605 
060514 
0786*4 

06/i5 13 
12 4 5 3 
00 ! 3 
000015 



AS? 
IE 



STA 

LDA 
STA 
LDA 
STA 
LDA 
JMP 
OCT 
OCT 



AS2 

*-? 

U 

IE 

E15 

AS? 

ILINT, I 



15 



ENTER SUBROUTINE 

STORE A 

STORE PROGRAM ADDRESS 

STORE 

ERROR 15 
RESTORE A 
EXIT SUBROUTINE 
TEMPORARY STORAGE 
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0343* T'HE FOLLOWING P 
0344*]N CASt OF FAIL 



034S*mALTS AT 
»346»P«ESSIN& 
0347* 

33*15 
00516 
00S1 7 
00520 
00521 
03522 
00523 
00524 
00525 
00526 
a id '527 
0053* 
00P-31 
35 32 

00533 

13ido34 
05 35 
00536 
00537 
3 h 4 ti 
00641 
i9 « 6 4 2 
00543 
00644 
00545 
0354t« 

a 39 4 7 

00550 



me be 

"DlSPL 



1/134 8 

034V 

0350 

0351 

0352 

0353 

0354 

035b 

0356 

0357 

03 SB 

0359 

0360 

0361 

13362 

03t>3 

0364 

36 5 

0366 

0367 

0368 

03*9 

0370 

0371 

03/2 

B3 7 3 

1*374 

03/5 

v) 3 7 6 13 .» 5 h 1 

0377 00S5? 

037ft 03553 

0379 03551 

0380 00565 

0381 0055* 
03B2 00557 
0363 03560 
0384 00561 
03R5 00662 
0386 00563 
03B7 00564 

0388 00565 

0389 00566 

0390 00567 
0391* 

0392*ERROR 
0393* 
0394 



039b 
3 96 
0397 
0398 
0399 



3570 
00671 
0357? 
00573 
0.45/d 
00S/5 



000000 

107700 

006400 

014461 

024523 

014564 

06W633 

7 6 34 

060635 

07W527 

064570 

034537 

0067102 

024536 

034634 

024b27 

024544 

060636 

014654 

0147*1 

014720 

14 4 7 2 

32 4 533 

064604 

0060^3 

024560 

060636 

014 7M 
060663 
0U751 
060505 
014774 
014720 
014720 
060632 
014733 
014472 
124300 
000300 
060364 
064564 
102035 

BUFFER 

000000 
000000 
000000 

00 00 
000000 
000300 



KIMS 

URE T 
GINNI 

AV HE 

POUT 



OUT THE RESULTS OF THE BASIC TEST, 
PRINT OUT, THE PROGRAM 
NG OF THE ERROR BUFFER. 
MORY" WILL SHOW WHICH ERRORS OCCURED. 



P4 



P5 



P6 



POF 



fc'l 

E2 

es 

E4 

E5 

E6 



NOP 

CLC 

CLH 

JSB 

JMP 

JSR 

LDA 

ST A 

LDA 

ST A 

LPR 

IS? 

S7H 

JMP 

IS/ 

JMP 

J MP 

LDA 

JSB 

JSB 

JSB 

JSB 

JMP 

LD8 

SZB, 

JHP 

LDA 

JSB 

JSB 

LDA 

JSP 

LDA 

JSP. 

JSP 

JSB 

LDA 

JSB 

JSB 

JHP 

NOP 
LDA 
LDB 
HLT 



TOS 

*♦? 

POF 

SC2 

*14 

613 

P4 

Ft 

*-l 

* + 4 
Ml A 
P4 
P5 

t 

Y N A 

POUT? 

to I. 

E8H. 

* - 1 6 
E15 
RSS 
P6 

f: 

(I Y N A 

POUT? 

bid 

MPO 

I A 

OPA 

eoi. 
tot. 
si? 

bMPOC 
E8H 
8T, I 

*-l 
*"?. 
55B 



OCT 
OCT 
OCT 
OCT 
OCT 
OCT 



INITIALIZE, INTERRUPT OFF 

FLAO SET? 
YES 

NO.* HALT AT ERROR BUFFER 
PREPARE TO 
PRINT OUT 

ERROR CODES 

LOAD B WITH 

ERROR STORAGE 
ZERO? 
NO, 

YES. PARTIALLY DONE? 
NO. 

YES. CHECK INTERRUPT ERRORS 
PRINT 

OUT 

ERROR 
CODE 
HALT AT ERROR BUFFER? 
NO. 
E15 « s>? 

YES. 

NO , 

PKINT OUT 
ERROR CODE 
AND 

PROGRAM ADDRESS 
WHEN ERROR 
OCCURRED 
LINE FEED 
LINE FEED 
PRINT SFCONO 
8T MESSASE 
HALT AT ERROR BUFFER? 
NO. EXIT ROUTINE 

PUT PROGRAM ADDRSSS 
FOR PRINT FAILURE 
INTO A AND B 



SFC 
SFS 
SFC 
SFS 
SFC 
SFS 



TRUE 
FALSE 
FALSE 

TRUE 
FALSE 

TRUE 



AFTER 
AFTER 
AFTER 
AFTER 
AFTER 
AFTER 



CLC 
CLC 
CLF 
CLF 
CLF 
CLF 



0,C 
0,C 
TTY 
TTY 
TTY 
TTY 



AND 

AND 



STC 

SIC 
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0400 
6*4 1 

0402 
0403 
0404 

0405 

0406 

M07 

0408 

0409 

04 i 0* 

0«1 1 



04 J 2 
0413 
04 14 



0415 
0416 
0417 
0418 
0419 
0420 
0421 



S 7 b 
W)77 
006'>I0 

01J60 1 

00h0? 

00(S43 
00604 
006M5 

is 6 

00647 

r> 1 V- 

006 1 1 

0061? 

M 3 

00M4 

0061b 

006 lf> 

8506 17 

1806 2(15 

00621 

00622 

00623 

00624 

00625 

00^26 

00»s?7 

00630 

00 6 31 

00632 

00633 

006 34 

0363b 

00636 

00637 

00640 

00*41 

00642 

00643 

00644 

0064?) 

00ft 46 

00647 

00650 

00631 

00^32 

00653 



0422 

04 23 
0424* 

0425*PRlNT 
0426* 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
177777 
B24124 

04U-JS 
04351 1 
047040 
4 1101 
05151 I 
041 440 
052149 
051524 
000000 
060610 
042516 
042040 
04 11 01 
051511 
0414 40 
052105 
051524 

000000 

060622 
177764 
000000 
064570 
000305 
020040 
020120 
051 1 17 
043S22 
04 0515 
020 1 n 
042104 
05U05 
051523 
020075 
020040 
000000 
6 6 3 7 



E7 OCT MO INTERRUPT AFTER STC TTY,STF « 

t!0 OCT SFC TRUE AFTER INTERRUPT 

Ell OCT SFS FALSE AFTER INTERRUPT 

El? OCT DATA CLOCK ON T1Y BOARD TOO FAST 

E13 OCT DATA CLOCK ON TTY BOARD TOO SLCN 

E14 OCT DATA BUFFER ERROR 

E15 OCT ILLEBAl. INTERRUPT FROM TELETYPE 

U OCT (* PROGRAM ADDRESS AT MME OF E15 

OCT 177777 ERROR BUFFER TERMINAJTON 

JMP MP1. RETURN TO MAIN PROGRAM 

HT*1 ASC 8,RE01N BASIC TEST 



SIl 

«TM2 



SJ2 
SC2 
Ml 4 
SI 3 
E 
PRAD 



SI 4 



OCT 

LD« 
ASC 



hTMl 

'7, END BASIC; TEST 



OCT 
LD* 
OCT 
OCT 
I OK 
OCT 

ash 



Of 

BTM2 

177764 



El 

30^ 

11. 



PROGRAM ADDRESS 



nnT » 
LDA PRAD 



LEAST SIGNIFICANT » 9ITS OF A 



0427 
0428 
0429 
04 30 
04 31 
0432 
0433 



00654 

00655 
00656 
00657 
00660 
00661 
00662 



000000 
107700 
07*4677 

074/00 
060675 
1026:10 
060677 



OYNA 



0T«3 



NOP 
CLC 
ST* 
ST U 

L DA 
OTA v 
LDA AST 



0,0 
AS3 

BSi 

or 'j 



ENTER SUBROUTINE 

INITIALIZE, INTERRUPT uFF 

STORE A 

STORE << 

PUT BUFFER INTO OUTPUT 

AND PRINT MODE 
RESTORE A 
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t«434 

043b 
0436 
0437 
0438 

0439 

04 40 
0441 

0442 

W443 
0444 
?> 4 4 b 
446 
0447 
fc: 4 4 8 * 
IM49* 
0d b0* 
04 bl 
4 5)2 

04b4 

ic>4bb 

04b6 

04b7 

04b8 

0459 

0460 

0401 

0462 

0463 

0464 

0465 

4 66* 

0467* 

0468* 

0469 

0470 

0471 

0472 

0473 

0474 

0475 

0476 

0477 

0478 

0479 

0480* 

0481 

0482* 

0483 

0484 

048S 

0486 

0487 

0488 

0489 

0430 



04663 
00664 
8 366b 
00666 
00667 
00670 
00671 
00672 
00673 
00674 
0* 7 b 
00676 
00677 
00740 



01/43 5 

1 02600 
103700 
0064.10 
014-1^1 
024672 
1 4364 
06K677 
064700 
1246b4 
12!!1000 
120000 
000000 
000000 



9 T A 4 
STCC2 



SOYN 
A S3 

BS! 



A N I'i 
OTA 
STC 
CL« 
JSB 
IMP 
JSh 
L DA 
LD c i 
J MP 
OCT 
OCT 
OCT 
OCT 



f> S k ;? 


0,C 

TOR 

* ♦o 

POF 

AS 4 

BS1 

OYNA, I 

12«000 

12P1000 







PklNT OUT T*0 OCTAL NUMBERS 



00701 
007w2 
00703 

00704 
00745 
00706 
007^17 

00710 

00711 
00712 
00713 
007 14 
00715 
0716 
00717 



000000 
060001 
001 100 
00110 
H -4 
010717 
0307 16 
014S*>4 
060',M1 
010 7 17 
0307 16 
0146^4 
124 7 11 
000260 
000007 



PQHT2 



MSK4 
MSK5 



NOP 
LDA 
APS 
APS 
ARS 
AND 
IOW 
JSB 
LDA 
A Nil 
!OP 
JSB 

jmp 

OCT 
OCT 



P-SKS 
PSK4 

OYMA 

1 

MSK5 

hSK4 

OYNA 

POHT2 

26'* 

7 



END OF LINE SUBROUTINE 



007 20 
00721 
9V722 
00723 
00724 
0072b 
00726 
00727 
00730 
007 51 
i5d7H 



000000 
<A7<A76to 
0607 51 
014654 
060732 
014654 
063730 
124 720 

000000 

000215 
00O»212 



EOL 



AS4 
CR 

LF 



NOP 
STA 
LDA 
JSB 
LDA 
JSB 
LDA 
JMP 
OCT 
OCT 
OCT 



AS4 
CR 

OYNA 
LF 

OYNA 
AS4 

eoi , 



21b 
212 



OUTPUT LEAST 
SIGNIFICANT 8 
BITS OF A 

FLAG SET? 

MO. HALT AT ERROR PUFFER 

YES. RESTORE A 

RESTORE H 

EXIT SUBROUTINE 

OUTPUT, PRINT, NO PUNCH 

TfcMpORARY STORAGE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 
OUTPUT 
FIRST 
NUMBER 



OUTPUT 
SECOND 
NUMBER 

T EXIT SUBROUTINE 



ENTER SUBROUTINE 
STORE A 
CARRIAGE 

RETURN 
LINE 

FEEn 
RESTORE A 
EXIT SUGROUIINE 
TEMPORARY STORAGE 



•SUPPRESS MESSAGE PRINTOUT CHECK SUBROUTINE 



08733 
00734 

00735 
00736 
00 7 37 

7 4 tt 
00741 

00742 



000000 
ti/V)751d 
014145 

060 176 
00201 1 
Vi 2 4 7 4 3 
0607b0 
1 24/33 



SMPOC 



NOP 

STA AS5 

JSB MOI1E 

IDA BIT2 
SLA,PSS 

JMP * ♦ 3 

I 11 A ASb 

JMP SMPOC, 



ENTER SUBROUTINE 
STORE A 

CHECK S*. REG. 
SUPPRESS EXCESS 

PRINTING? 
HO. 

YES. RESTORE A 
EXIT SUBROUTINE 



-13- 



PAGE 18011 #01 



0491 
0492 
1*493 
0494 
0495 

04 96 
feU97* 
0498* 
0499* 

0501 

0502 

0503 

0504 

0505 

0506 

0507 

a 5 8 * 

0509* 

0510* 

S)51 1* 

0512 

as 1 3 

0514 

051& 

0516 

0517 

0518 

0519 

0520 

0521 

0522 

0523* 

0524* 

0525* 

0526 

0527 

0528 

0529 

0530 

0531 

0532 

0533 

0534 

0535 

0536 

05 57 
0538 
0539 
0540* 
0541* 
0542* 
0543 
0544 
0545 
0546 
05 4 7 



007 43 
00744 

00745 
A 7 4 6 
0.0747 

00750 



060750 
014751 
1 4 7 2 
014720 
li!4733 

000000 



AS5 



LDA 
JSB 
JSB 
JS« 
JMP 
OCT 



AS5 
MPO 
fcOL 
to I. 

SMPOC, I 





MESSAGE PRINTOUT SUBROUTINE 



00751 
0075? 
00753 
00754 
00755 
00756 
00757 
0076? 



000000 
070753 

060000 
034753 
002003 
12 4 7 51 
014751 
024753 



HPU 



NOP 

STA *+l 

LDA 

IS7 *-1 
S*A,KSS 

J?*p HPf| r I 

J SB PA CO 

JMP *-5 



RESTORE A 

PRINT MESSAGE 

LINE FEED 

LINE FEED 

EXIT SUBROUTINE 

TEMPORARY STORAGE 



ENTER SUBROUTINE 
LOAD A WORD 



WORD « 0? 
YES. EXIT 
NO. PRINT 
REPEAT FOR 



SUBROUTINE 
THE WORD 
NEXT KORn 



PACKED ASCII CHARACTER OUTPUT SUBROUTINE 

MOST SIGNIFICANT 8 BITS OF A REGISTER PRINTED FIRST, 



0075J 000P100 PACO NO p 



0*37o2 
7 63 
7 5 4 
00765 
04766 
00767 
00770 
00771 
00772 
7 7 3 



7 'A 7 7 3 

001700 

001740 
0104 55 
014 6 5 4 
060773 
010455 
14654 
124751 
000000 



ASfc 



OCTAL PRINTOUT UF A 



00774 
00775 
ti&77f 
00777 

0100* 
01001 
01002 
010 3 
010 4 

01 90S 

0100ft 

010 7 
1 •■? 1 
01011 



000000 
001 200 
071010 
011011 
030716 
014654 
015012 
015 012 
015012 
01D012 
015012 
124774 
000000 
000001 



UPA 



AS7 

MSK6 



STA 

ALF 
ALP 
AND 
JSB 
IDA 
AND 
J SB 
JMP 
OCT 



NOP 
RAL 
STA 
AND 
IOR 
JSB 
JSB 
JSB 
JSB 
JSP 
JSR 
JMP 
OCT 
OCT 



AS6 



MSK2 
1 H A 
ASfS 
MSK2 
Y M A 

p a r. o , i 





AS7 
MSK6 
MSK4 
UYNA 

NXT 

NXT 

NXT 

NXT 

NXT 

OPA, I 



I 



NEXT OCTAL CHARACTER OUTPUT 



01F112 000000 

010 13 6 1 I 

10 14 1 2 

010 It 1 00 1^30 

1 iM t> 12 



MXl 



NOP 
LDA 
RAL 

RAL 
*Ai 



AS7 



SUBROUTINE 

A 



ENTER 
STORE 
PRINT 
FIRST 

CHARACTER 

PRINT 
SECONn 

CHARACTER 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 

STORE A 
PRINT 
FIRST 

NUMBER 
PRINT 
NEXT 
FIVE 

NUMBERS 

EXIT SUBROUTINE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 
PREPARE 

THE 
NFXT 

NSIHBEP 
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05 4 8 

0549 

0550 

0551 

0552 

0553* 

0554* 

0355* 

0556* 

0557* 

0558* 

0559* 

0560* 

0561* 

0562 

0563 

0564 

0565 

0566 

0567 

0568 

0569 

0570 

05/1 

0b72 

0573 

0574 

0575 

0576 

0577 

05/8 

0579 

0b 6 

n 5 B 1 

H5b2 

05b3 

0584 

05H5 

0586 

0587 

0588 

0569 

0590 

0591 

0592 

0593 

0594 

0595 

0596 

0597 

0598 

0599 

0600 

0601 

0602 

06H3 

0604 



01<*l7 071010 
0U20 010717 
01021 030716 
01P2? 014654 
0142- 125012 



STA AS7 

AMD MSK5 

I0» HSK4 

JSB OYnA 

J MP NXT,l 



FOR 

OUTPUTINS 



OUTPUT 

EXIT SUBROUTINE 



PUNCH AND READ ROUTINE 

TESTS TAPE PUNCH AND TAPE READER 
BY OUTPUTING ALL COMBINATIONS OF 
EIGHT BITS AND READING THEM BACK 



01024 
01025 
01026 
01027 
01430 
810 31 
01(^32 

a iM33 

01034 
01 £35 

01036 
01337 
1 4 
I'M 1 
010 4 2 
1 4 3 
1 4 4 
010 4 5 
1 4 * 
1*47 
01">50 
1W51 
01i>52 
01H53 
1 ',1 5 4 
01055 
01056 
18 1H 57 
01060 
010 61 
01002 
1063 
01064 
01065 
01066 
01067 
01070 
01071 
01«72 

1 7 3 

1 1 7 & 
010 7b 
01«76 



000000 
107700 
006400 
014461 
025032 
014964 
061216 
014733 
061 036 
069036 
102302 
061 t 11 
7 6 7 5 
015232 
003400 
010455 
014654 
002400 
015242 
015242 
0611 12 
070675 
060730 
015242 
015242 
015232 
015232 
015232 
0151 17 
061063 
065063 
102003 
061116 
070675 
002400 
014654 
106500 
006003 
025067 
01 5? 53 
06M 13 
070675 
0613 4 7 



PAR 



LIB2 



NOP 
CLC 
CLP 

JSB 
JMP 
JSB 
LI) A 
JSP 
LDA 
LDB 
»LT 
LDA 
STA 
JSB 
CCA 
ANH 
JSB 
CLA 
JSB 
JSK 
LDA 
STA 
LDA 
JSB 
JSB 
JSR 
JSB 
JSB 
JSP 
LDA 

101 
HLT 

LDA 
STA 

CLA 
JSB 
LIB 
SZB 
J MP 
JSB 
LD4 
STA 
LDA 



0,r: 

tor 

* + ?' 
POP' 
sir 

SMPOC 

* + Jl 

*♦! 

2 

GNY 
OYN 
I EPOS 

MSK2 
OYNA 

. 6 4 C H 
. 6 6 C H 
HYY 

Y U 
AS /J 
.6-SCH 
.64CH 
ZEROS 
ZEROS 
ZEROS 
PAPE 

* + ;> 
*♦! 
3 

INN 
OYN 

OYNA 

,RSS 
*-:? 
K64CH 

1 YN 
OYN 
A S 1 1 



ENTER ROUTINE 

INITIALIZE, INTERRUPT OFF 

FLAG SET? 

YES. 

NO. HALT AT ERROR BUFFER 

PRINT FIRST 

PAR MESSAGE 
HALT TO 
TURN ON 
PUNCH 
PREPARE TO 

PUNCH TAPE 
PUNCH LEADE» 
OUTPUT ALL ONES 
AS A BEGINNING 
INDICATOR 
PUNCH 
ALL 

COMBINATIONS 

OF EIGHT 

SITS 



PUNCH 

TRA ILFR 

EXIT ROUTINE? 
NO. MALT TO 

LOAD TAPE 

INTO READER 
PREPARE TO 

READ 
TAPE 
READ A 

CHARACTER 
CHARACTER « 0? 
YES. READ NEXT CHARACTER 
NO, READ FIRST BLOCK 
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0605 


Id 1 7 7 


015253 




J SB 


K64CH 


060 6 


011*0 


061114 




LDA 


I NY 


0t> a 7 


01101 


070675 




ST* 


PYN 


060B 


1 \<&2 


061307 




IDA 


AS 1 1 


0609 


01 103 


015253 




JSS 


Wfe>!CH 


0610 


1134 


061 1 15 




ID* 


I YY 


061 1 


0113 6 


070675 




STA 


Y M 


0612 


01 106 


061307 




IDA 


AS1 1 


61.5 


0110 7 


015253 




JSB 


P64CH 


0614 


01110 


02bl27 




JMP 


P7 


0615 


011 t 1 


110P00 


CNY 


OCT 


1 10000 


0616 


01 I 1? 


130000 


Y Y 


OCT 


1 30000 


#617 


1113 


16 0/100 


1 Y M 


OCT 


16*000 


H616 


01 11,4 


153000 


1NY 


OCT 


1 5C»000 


0*19 


01115 


1 7 0000 


1 YY 


OCT 


17M000 


0620 


an 16 


140000 


INN 


OCT 


1 490051 


ttbd 1* 












0622* 


PUNCH l 


\ND READ 


EXIT 


SUEIROUT INF 


6 if J * 












0624 


01117 


000000 


PARE 


NOP 




062 5 


rfl 1 20 


071135 




STA 


AS8 


0626 


01121 


014 145 




•JSR 


MonE 


Abi7 


01 122 


060200 




Lf'A 


61 T4 


«62S 


0112 3 


002011 




SLA 


,KSS 


Ki6^y 


01 124 


026127 




JMP 


**3 


0630 


01125 


061 135 




LOA 


AS« 


0631 


01126 


1251 17 




JMP 


PAPE, I 


06 32 


01 1 27 


06M676 


97 


LOA 


SOYN 


0633 


01 130 


070575 




STA 


OYM 


06 s) 4 


01 131 


014720 




JSP 


EOL 


0635 


01 ) 32 


K61231 




IDA 


sin 


0636 


01133 


014733 




JSfi 


SMPOC 


0b37 


01134 


125024 




JMP 


P A R , I 


0636 


01 135 


000000 


ASS 


OCT 





0639* 












0640* 


PRINT OUT ERRORS ROUT IMF 




6 4 1* 












0642 


01136 


000000 


poe 


NOP 




0643 


01137 


071162 




STA 


ASQ 


0644 


01140 


060675 




LDA 


OYM 


0645 


01141 


071163 




STA 


AS10 


W646 


01142 


060676 




LDA 


SOYN 


0647 


01143 


07H675 




STA 


OYN 


0648 


01 t 44 


014720 




JSB 


EOL 


0649 


01 145 


061172 




LDA 


SI5 


0650 


01146 


014751 




JSP 


mpo 


0651 


01147 


061162 




L RA 


ASQ 


0652 


01150 


014774 




JSH 


OPA 


0653 


01 151 


061202 




LDA 


SI ^ 


0654 


01152 


014 7 51 




JS r -» 


hPO 


0655 


01153 


060001 




LI1A 


1 


0656 


01 154 


14 7 7 4 




jsa 


ljp« 


0657 


01 1 55 


0147 20 




JSE. 


EOL 


0658 


01 156 


W61 163 




LDA 


ASl 


0659 


01 157 


07">6/5 




STA 


Y >'. 


B660 


01 1 60 


061162 




L .n A 


ASO 


0661 


0116 1 


125136 




JMP 


POP, 1 



READ SECOND BLOCK 



READ THIRD BLOCK 



READ FOURTH HLOCK 

EXIT ROUTINE 

OUTPUT, NO PRINT, PUNCH 

OUTPUT, PRINT, PUNCH 

INPUT, PR I NT, NQ PUNCH 

INPUT r MO PRINT, PUNCH 

INPUT, PRINT, PUNCH 

INPUT, NO PRINT, NO PUNCH 



ENTER SUBROUTINE 
STORE A 

CHECK Sw, H(-;s. 
EXIT THIS 

ROUTINE? 
YES. 

MO. RESTORE A 
EXIT SUBROUTINE 
RESTORE 

OUTPUT CODE 
LINE FEED 
PRINT SECOND 

PAR MESSAGE 
EXIT ROUTINE 
TEMPORARY STORAGE 



ENTER 
STORE 
SAVE 
STATE 



8UBR0UT I NE 
A 



LINE FEED 

PRINT "OUTPUT ■" 

RESTORE A 

PRINT UCTAL NUMPER 

PRINT "INPUT »" 

PRINT OCTAL 

NUMHER 
LiNE FEED 
RESTORE 

STATE 
PESTOPE A 
EXIT SMpRQUi 1NE 



16- 



PAGE 0014 #01 



0662 
0663 
0664 



0665 
0666 
0667 



0668 
0669 
0670 



0671 
0672 
0673 



0674 

0675 

0676* 

0677* 

0678* 

0679 

0680 

0681 

0662 

0683 

0684 

0686 

0686 

0687* 

0688 

0669* 

0690 

0691 

H692 



01162 
01163 
01164 
01165 
01166 
01167 
01170 
01171 
01172 
01173 
01174 
01175 
01176 
01177 
01200 
01201 
01202 
01203 
01204 
01205 
01206 
01207 
01210 
01211 
01212 
01213 
01214 
015*15 
01216 
01217 
01220 
01221 
21222 
01223 
01224 
01225 
01226 
01227 
01230 
K5 1231 



000000 
000000 
047525 
052120 
052524 
020075 
020040 
000000 
061164 
020040 
020040 
044516 
050125 
052040 
038440 
000000 
0611/3 
041 105 
043511 
047040 
050125 
047103 
044840 
040516 
042340 
051105 
040534 
000000 
0612*33 
042516 
042040 
050125 
047103 
044040 
040516 
042040 

051105 
040504 
000000 

061217 



ASQ 

AS10 

UO 



SI5 

01 



S16 

PAKfU 



S 17 

PA«M2 



SI8 



OUTPUT BLANK TAPE 



01232 
01233 
01234 
01235 

01236 
01237 

01240 
01241 



000000 
002400 
065241 
014SS4 

006006 
025235 
1252 52 
177740 



ZEROS 



SC3 



OCT 
OCT 
ASC 5, OUTPUT 



TEMPORARY 
TEMPORARY 



STORAGE 
STORAGE 



OCT 
ID* 00 

ASC 6, 



INPUT 



OCT 

LD* 1 

ASC 10, BEG IN 



PUNCH AMD READ 



OCT 
LDA PARMl 

ASC 9, END 



PUNCH AND READ 



OCT 

LDA PARM2 



NOP 
CLA 

LDB SC3 
JS8 OYNA 
INB,8ZB 

jmp *•:> 
jmp zeros, i 

OCT 177740 



ENTER SUBROUTINE 



OUTPUT ZERO 

32 ZEROS? 

NO. 

YES. EXIT SUBROUTINE 



•INCREMENT AND OUTPUT A REU. 64 TIMES 



01242 000000 

01243 065252 

01244 014654 



.64CH 



NOP 
LDB 



SC * 



E^TER 
RESET 



SMHROi'T t Nf 
Cf'UMTr R 



JSB OYMA 



'UTPuT 4 
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0693 
0694 
0695 
0696 

06r?7 

0b98 

0699* 

0700*REAO 

0701* 

0702 



01245 
01246 
01247 
01250 
01261 
01252 



002004 
006006 
025244 
014720 
125242 
177700 



?NA 
INBrSZB 



AND CHECK 



0703 

0704 

0705 

0706 

\$7Q7 

0708 

0709 

0710 

0711 

0712 

0713 

0714 

0715 

0716 

07 17 

0716 

0719 

0720 

0721 

0722 

0723 

0724 

0725 

0726 

fd7?.7 

0728 

0729 

0730 

0731* 

0732* 

0733* 

0734*PR1MT 

07 35* 



01253 
01254 
01255 
01256 
01257 
01260 
012M 
01262 
01263 
01264 
01265 
01266 
01267 
01270 
01971 
01272 
01273 
01274 
01275 
01276 
01277 
01300 
01301 
01302 
01303 
01304 

01305 
01306 
01307 



000000 
065252 
075306 

014654 
106500 
015117 
050001 
025264 
015136 
002004 
035306 
025256 
071307 
060731 
014654 
106500 
050001 
025276 
015136 
060732 
014654 
106500 
050001 
025304 
015136 
061307 
125253 
177700 
000000 



SC4 



JMP 

JSB 
JMP 
OCT 



*-3 
EOL 

,64CH,I 
177700 



64 CHARACTERS 
R64CH 



P8 
LI63 



L Ib4 



llt>5 



M64 
AS11 



NOP 
LDB 
ST8 
J8B 
LIB 
JSB 
CP* 
JMP 
JSB 
IN A 
ISZ 
JMP 
STA 
IDA 
JSB 
LIP 
CPA 
JMP 
JSB 
LDA 
JSB 
LIB 
CPA 
JMP 
JSB 
LDA 
JMP 
OCT 
OCT 



SC4 

M64 

OYNA 



PARE 

1 

* + 2 

POE 

M64 
P8 

AS) 1 
CR 

OYNA 



1 
•♦2 

POE 
LF 

OYNA 

i 

POE 

ash 

R64CH, I 
177700 





AND KEYBOARD ROUTINE 



0736 
i&757 
0738 
0739 
0740 
0741 
0742 
0743 
0744 
07 4 5 
0746 
0747 
0748 
0749 



01310 
01311 
01312 
01313 
01314 
01315 
01316 
01317 
01320 
01321 
01322 
01323 
3 13 2 4 
0132b 



000000 
107700 
06P676 
070675 
061371 
014733 
015432 
015432 
0147?^! 
01534F 
061414 
914 7 33 
061 1 16 
1026tftf 



PAK 



T A 5 



NOP 
CLC 
LDA 
STA 
LDA 
JSB 
JSB 
JSB 
JSP 
JSB 
LDA 
JSH 
LD* 
OTA 



0,0 

SOYN 

OYN 

SI9 

SMPOC 

PRALL 

PRALL 

EOL 

PAKE 

SI10 

SMPOC 

INM 

6-t 



INCREMENT OUTPUT WORD 

64 CHARACTERS? 

NO, 

YES. 

EXIT ROUTINE 



ENTER SUBROUTINE 
RESET 

CHARACTER COUNTER 
READ A 

CHARACTER 
EXIT ROUTINE? 
NO. ERROR? 
NO. 

YES. PRINT OUT ERROR 
INCREMENT REFERENCE 
64 CHARACTERS? 
NO. 

YES. STORE A 
CHECK FOR 

CARRIAGE 
RETURN 
ERROR? 
NO. 

YES. PRINT OUT ERROR 
CHECK FOR 

LINE 
FEED 
ERROR? 
NO. 

YES. PRINT OUT ERROR 
RESTORE A 
EXIT SUBROUTINE 

TEMPORARY STORAGE 



ENTER ROUTINE 

INITIALIZE, INTERRUPT OFF 

PREPARE 

TO PRINT 
PRINT FIRST 

PAK MESSAGE 
PRINT 64 ASCII 
PRINT 64 ASCII 
LINE FEED 
EXIT ROUTINE? 
NO. PRINT SECOND 

PAK MESSAGE 
PREPARE TO READ 

IN FROM KEYBOARD 



CHARACTERS 
CHARACTERS 



-18- 



PA BE 001 6 #01 



0750 

0751 

0752 

0753 

13754 

0/55 

0756 

0757 

0758 

B759 

0760* 

0761* 

0762* 

0763 

0764 

07 65 

0766 

®7b7 

0768 

0769 

%77Sb 

»77i 

0772 

0773 

0774 

0775 



01326 
01327 
01330 
01331 
01332 
01333 
01334 
01335 
01336 
01337 



015340 
103700 
006400 
014461 
025334 
025326 
106500 

060001 

014654 

025324 



P10 
STCC3 



LIB6 



JSB 
STC 
CLB 
JSB 
JMP 
JMP 
LIB 
IDA 
JSR 
JMP 



PAKE 
0,C 

T08 
*♦? 

P10 


1 

OYNA 

P9 



FX I 

NO, 

F 

ANY 

YES 

NO. 
IDA 
PUT 
OUT 
PEA 



T ROUTINE? 

WAIT 

OR INPUT 

INPUT? 



D DATA INTO 8 

B INTO A 
PUT A 
D NEXT CHARACTER 



PRINT AND KEYBOARD EXIT 



0776 
0777 

077B 



0779 



01340 
01341 

01342 
01.543 
01344 
01345 
01346 
01347 
01350 
01351 
0115? 
01353 
01354 
01355 
01356 
01357 
01360 
01361 
01362 
01363 
01364 
01365 
01 566 
01367 
013 7 
01371 
01372 
137 3 

013 7 4 
01375 
01376 
01377 
01400 
01401 
0i4t?2 
01403 
01404 

014(ftb 

014 6 
01407 

1 A .1 !'? 
14 11 
H14 12 

14J. 3 



000000 
071162 
014145 
060201 
002011 
025350 
061162 
125340 
014720 
061431 
014733 
125310 
041105 
043511 
047040 
050122 
044516 
052040 
040516 
04?040 
045505 
054502 
047501 
1*51104 
000000 
061354 
052523 
042440 
045505 
054502 
047501 
051 104 
020123 
046117 
0535U 
054440 
024065 
020103 
044123 
027057 
05! 5 45 
04 1 4 66 
2 4 4 4 

00 



PAKE NOP 



STA ASO 
JSB MOT1E 
LDA BITS 
SLA,»SS 



JMP 
LDA 
JMP 
JSB 
LDA 
JSB 
JMP 



* + 3 
ASQ 

PAKEr I 
ECU. 
SI tl 
SMPOC 
PAK. S 



ENTER SUBROUTINE 
STORE A 

CHECK SW. REG. 
EXIT THIS 

ROUTINE? 
YES. 

NO. PESTORE A 
EXIT SUBROUTINE 

PRINT THIRD 

PAK MESSAGE 
EXIT ROUTINE 



PAKM1 ASC 12, BEGIN PRINT AND KEYBOARD 



OCT 
SI9 LDA 
PAKM2 ASC 



PAKM1 
17 , USE 



KEYBOARD SLOWLY <5 CHS. /SEC.) 



OCT 
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0780 
0/81 



tf782 
v)/8 3 
t* 7 B 4 * 
i?785* 
W 7 » 6 * 

0787 

tt7 86 

0789 

0790 

0791 

0792 

0793 

07 9"* 

7 95* 

0796* 

0797* 

0798 

0799 

0800 

0801 

0802 

0803 

0804 

0805 

0806 

0807 

0808 

0809 

** N 



01414 
0141b 
01416 
01 417 
01420 
01421 
01422 
141423 
01424 
01425 
01426 
01427 
01430 
01431 



0bl372 
042516 
042040 
05H122 
044516 
052040 
040516 
04 204 
045505 
054502 
047501 
051104 
000300 
061415 



SI 10 
PAKM3 



IDA 
ASC 



PAKK2 

11, two 



PRINT AND KEYBOARD 



sin 



OCT 
LDA 





PAKM3 



P*I*JT ALL CHARACTERS SUBROUTINE 



►11432 000000 PRALL NOP 



01433 
01434 
01435 
04436 
01437 
01440 
01441 



061440 
015442 
061441 
015442 
125432 
000300 
000240 



SC5 

SC6 



LDA 

JSB 
LDA 
JSB 
JMP 
OCT 
OCT 



SC5 

.32CH 

SC6 

.32CH 

PRALL,I 

300 

240 



PRINT 32 CHARACTERS SUBROUTINE 
01442 000000 .32CH NOP 



01443 
01444 
01445 
01446 
01447 
01450 
01451 
01452 
014 B >3 
01454 



075454 
065241 
014654 

002004 
006006 
025445 
014720 
065454 
125442 
0008100 



BS2 



STB BS2 

LD8 SC3 

JSB OYNA 
INA 

INB»SZB 

JMP *-3 

JSB EOL 



LDB 
JMP 
OCT 
END 



BS? 

,32CH r I 




ENTER SUBROUTINE 
PRINT FIRST 

LINE OF CHARACTERS 
PRINT SECOND 

LINE OF CHARACTERS 
EXIT SUBROUTINE 



ENTER SUBROUTINE 

STORE B 

RESET COUNTER 

PRINT A 

INCREMENT A 

32 CHARACTERS? 

NO, PRINT NEXT CHARACTER 

YES. LINE FEED 

RESTORE B 

EXIT SUBROUTINE 

TEMPORARY STORAGE 



ERRORS* 



-20- 



2115A/14A BUFFERED TELETYPE TEST 



BINARY TAPE - HP20420B 
SOURCE TAPE - HP20WB 
SOURCE LISTING - HP20420BL 



PAGE 0001 



0001 

** NO ERRORS* 



AStBrA.B.L 



JO^£o& 
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0001 

0002* 

0003* 

0004* 

0005 

0006* 

0007* 

0008* 

0009* 

0010* 

0011* 

0012* 

0013* 

0014* 

0015* 

0016* 

0017* 

0018* 

0019* 

0020* 

0021* 

0022* 

0023* 

0024* 

0025 

0026 

0027 

0028 

0029 

0030 

0031 

0032 

0033 

0034 

0035 

0036 

0037 

0036 

0039 

0040 

0041 

0042 

0043 

0044 

0045 

0046 

0047 

0048 

0049 

0050 

0051 

0052 

0053 

0054 

0055 

0056 

0057 



A8f"B,A.B.L 



•BUFFERED TELETYPE DIAGNOSTIC 2115/14 07/08/68 



STARTING OCTAL ADERESS ■ 10M 

*** 

THE FOLLOWING SWITCH REGISTER SETTINGS 

ARE USED FOR PROGRAM CONTROL 



BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
*** 




1 
2 
3 

4 
5 



-> 

• > 



MAIN PROGRAM 



99977 
99977 

00100 
00101 
00102 
00103 
00104 
00105 
00106 
00107 
00110 
00111 
00112 
00113 
00114 
00115 
00116 
00117 
00120 
00121 
00122 
00123 
00124 
00125 
00126 
00127 
00130 
00131 
00132 
00133 
00134 
00136 
00136 



102000 
107700 
102501 
010141 
0703*3 
014203 
064142 
060143 
070111 
060144 
070010 
034111 
002004 
006006 
024111 
060407 
070000 
014752 
060123 
064123 
102001 
014145 
060177 
000010 
014304 
014145 
060200 
000010 
015056 
014145 
060201 
000010 



HALT AT BEGINNING OF PROGRAM 
HALT AT ERROR BUFFER 
SLPPR6SS MESSAGE PRINTOUT 
PERFORM BASIC TEST ROUTINE 
PERFORM PUNCH AND READ ROUTINE 
PERFORM PRINT AND KEYBOARD ROUTINE 



ENC 



STA1 



MP1 



OR6 


77B 




HLT 







CLC 


0rC 


INITIALIZE, INTERRUPT 


L 14 


1 


PUT TTY 


ANG 


MSK0 


ADDRESS 


8TA 


BTA 


INTO ALL I/O 


JSI 


INIT 


INSTRUCTIONS 


LDR 


M67 


PREPARE 


LDA 


HIS 


TRAP 


STA 


**2 


FOR 


LDA 


HI 


ILLEGAL 


• TA 


10B 


INTERRUPT 


IS1 


*-l 


FROM 


INA 




ANOTHER 


INB, 


rSZB 


DEVICE 


JMP 


*-4 




LDA 


I I J 


PREPARE ILLEGAL TTY 


STA 





INTERRUPT TRAP 


jse 


EOL 


LINE FEED 


LDA 


• ♦2 


HALT TO CHOOSE 


LD8 


**1 


SWITCH REGISTER 


HL1 


1 


OPTIONS 


JSB 


MODE 


CHECK SW. REG. 


LDA 


BIT3 


PERFORM 


SLA 




BASIC TEST? 


JSI 


BT 


YES. 


jse 


MODE 


NO. CHECK SW. REG. 


t DA 


BIT4 


PERFORM 


SLA 




PUNCH AND READ? 


JSB 


PAR 


YES. 


JSB 


MODE 


NO. CHECK SW, REG. 


LDA 


BITS 


PERFORM 


8LA 




PRIMT AND KEYBOARD? 



PAGE 0003 #01 



0058 


00137 


015342 




JSB 


PAK 


YES. 


H059 


00140 


024124 




JMP 


MP1 


NO, 


0060 


00141 


000077 


MSK0 


OCT 


77 




0061 


00142 


177711 


H67 


OCT 


17771 1 




0062 


00143 


070010 


HIS 


8TA 


10B 




0063 


00144 


102010 


HI 


NLT 


10B 




0964* 














0069* 


SWITCH 


REGISTER MCNlTCRtD 




0066* 


FOR CURRENT OPERATIN8 MODE 




0067* 














0068 


00145 


000000 


HOEE 


NOR 




ENTER SUBROUTINE 


0069 


00146 


070173 




8TA 


AS0 


STORE A 


0070 


00147 


102501 




LI* 


1 


EACH BIT 


0071 


00150 


070174 




»TA 


BIT0 


FROM THE 


0072 


00151 


001300 




RAR 




SNITCH REGISTER 


0073 


00152 


070175 




• TA 


BIT1 


IS ROTATED 


0074 


00153 


001300 




RAR 




INTO THE 


0075 


00154 


070176 




ST* 


BIT2 


LEAST SIGNIFICANT 


0076 


00155 


001300 




»AR 




POSITION AND 


QH77 


00156 


070177 




8TA 


BIT3 


STORED IN THE 


0078 


00157 


001300 




RAR 




STORAGE LOCATION 


0079 


00160 


070200 




8TA 


B1T4 


BEARING ITS NAME 


0080 


00161 


001300 




RAR 






0061 


00162 


070201 




8TA 


8IT5 




0082 


00163 


060174 




IDA 


BIT0 


HALT AT BEGINNING 


0083 


00164 


002011 




SLA, 


,RSS 


OF PROGRAM? 


0084 


00165 


024171 




JMR 


**4 


NO. 


0085 


00166 


060202 




LDA 


HAD 


YES. LOAD A AND B 


0086 


00167 


064202 




LDB 


HAD 


WITH 100 


0087 


00170 


024077 




JMF 


END 


AND HALT 


0088 


00171 


060173 




LDA 


AS0 


RESTORE A 


0069 


00172 


124145 




JMP 


MODE. I 


EXIT SUBROUTINE 


0090 


00173 


000000 


asb 


OCT 





TEMPORARY STORAGE 


0091 


00174 


000000 


BI10 


CCT 







0092 


00175 


000000 


B IT 1 


OCT 







0093 


00176 


000000 


BI12 


OCT 







0094 


00177 


000000 


8113 


OCT 







0095 


00200 


000000 


BIT4 


OCT 







0096 


00201 


000000 


BITS 


OCT 







0097 


00202 


000100 


HA£ 


OCT 


100 




0096* 














0099* 














0100* 


INITIALIZATION 


ROITINE 






0101* 














0102* 


THIS ROUTINE ADDS THE BLFFERE" 


TELETYPE ADDRESS TO 


0103* 


ALL I/O INSTRUCTIONS 


• 






0104* 














0105* 














0106 


00203 


000000 


INIT 


NOP 




ENTER ROUTINE 


0107 


00204 


107700 




CLC 


0,C 


INITIALIZE, INTERRUPT OFF 


0108 


00205 


014274 




JSB 


ADIN 


PUT TTY ADDRESS 


0109 


00206 


102300 




8FS 





INTO SFS INSTRUCTIONS 


0110 


00207 


070340 




8TA 


SFS1 




0111 


00210 


070347 




8TA 


SFS2 




0112 


00211 


070357 




8TA 


SFS3 




0113 


00212 


070401 




8TA 


SFS4 




0114 


00213 


070512 




8T4 


SFS5 
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0115 

0116 

0117 

0118 

0119 

0120 

0121 

0122 

0123 

0124 

0125 

0126 

0127 

0128 

0129 

0130 

0131 

0132 

0133 

0134 

0135 

0136 

0137 

0138 

0139 

0140 

0141 

0142 

0143 

0144 

0145 

0146 

0147 

0148 

0149 

0150 

0151 

0152 

0153 

0154 

0155 

0156 

0157 

0158 

0159 

0160 

0161 

0162 

0163* 

0164* 

0165* 

0166* 

0167* 

0168 

0169 

0170 

0171 



00214 

00215 

00216 

00217 

00220 

00221 

00222 

00223 

00224 

00225 

00226 

00227 

00230 

00231 

00232 

00233 

00234 

00235 

00236 

00237 

00240 

00241 

00242 

00243 

00244 

00245 

00246 

00247 

00250 

00251 

00252 

00253 

00254 

00255 

00256 

00257 

00260 

00261 

00262 

00263 

00264 

00265 

00266 

00267 

00270 

00271 

00272 

00273 



014274 

102200 

070334 

070344 

070354 

070375 

014274 

102600 

070415 

070450 

070471 

070713 

070716 

071357 

014274 

103700 

070417 

070717 

A71361 

014274 

106700 

070420 

014274 

102700 

070353 

070500 

014274 

103100 

070343 

014274 

102100 

070366 

014274 

106500 

070451 

070472 

070501 

071122 

071311 

071324 

071332 

071366 

014274 

070000 

070U7 

070364 

070374 

124203 



J SB 
8FC 
ST* 
ST* 
8T* 
ST* 
JSB 
CT* 
ST* 
8T* 
ST* 
8T* 
8T* 
8T* 
JSH 
8TC 
BT* 
ST* 
ST* 
JSB 
CLC 
ST* 

JSi 

STC 
ST* 
ST* 

jse 

CLF 
8T* 
JSB 
8TF 
8T* 
JSB 
LIB 
ST* 
ST* 
8T* 
ST* 
ST* 
ST* 
8T* 
ST* 
JSB 
8T* 
ST* 
ST* 
8T* 
JMP 



ADIN 



SFC1 

8FC2 

SFC3 

SFC4 

ADIN 



0TA1 

0TA2 

0TA3 

0TA4 

0TA5 

0TA6 

ADIN 

0,C 

STCC» 

STCC9 

STCC* 

ADIN 



CLC1 

ADIN 



STCt 

STC2 

ADIN 



CLF1 

ADIN 



STFl 

ADIN 

LIB1 

LIB2 

LIB3 

LIB4 

LIB5 

LIB6 

LIB7 

LIBS 

ADIN 

8 

STA1 

STA2 

STA3 

INIT. 



ADDRESS INCLUSION SU0ROLTINE. 
THE BUFFERED TTY ADDRFS* IS Pn 
THE INSTRUCTION FCLLOHKG JSB 



I 



PUT TTY ADDRESS 

INTO SFC INSTRUCTIONS 



PUT TTY ADDRESS 

INTO OTA INSTRUCTIONS 



PUT TTY ADDRESS 

INTO STCC INSTRUCTIONS 



PUT TTY ADDRESS 

INTO CLC INSTRUCTION 

PUT TTY ADDRESS 

INTO STC INSTRUCTION 



PUT TTY ADDRESS 

INTO CLF INSTRUCTION 

PUT TTY ADDRESS 

INTO STF INSTRUCTION 

PUT TTY ADDRESS 

INTO LIB INSTRUCTIONS 



PUT TTY ADDRESS 

INTO STA INSTRUCTIONS 



EXIT ROUTINE 



T INTO 
ADIN. 



00274 000000 
2*27* 16*274 
00276 010302 
&Q277 0303(03 



ADIN 



NOP 

ID* ADIN 
ANt PSK1 
10* BTA 



ENTER SUBROUTINE 
BRING I/O INSTRUCTION INTO A 
ADD TTY ADDRESS 
TO INSTRUCTION 
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0172 

0173 

0174 

0175 

0176* 

0177* 

0178* 

0179* 

0180* 

0181* 

0182* 

0183* 

0184 

0185 

0186 

0187 

0188 

0189 

0190 

0191 

0192 

0193 

0194 

0195 

0196 

0197 

0198 

0199 

0200 

0201 

0202 

0203 

0204 

0205 

0206 

0207 

0206 

0209 

0210 

0211 

0212 

0213 

0214 

0215 

0216 

0217 

0218 

0219 

0220 

0221 

0222 

0223 

0224 

0225 

0226 

0227 

0228 



00300 034274 

00301 124274 

00302 177700 

00303 000000 



MSKt 
BTA 



ISi AOIN 

JMP ADIN-I 

OCT 1777«0 

OCT 



EXIT 

SUBROUTINE 

TTY ADDRESS STORAGE 



BASIC TEST ROUTINE 

THE FOLLOWING TESTS 
AND INTERRUPT CIRCUI 



THE 
TRY 



FLAG, CONTROL, 



00304 

00305 

00306 

00307 

00310 

00311 

00312 

00313 

00314 

00315 

00316 

00317 

00320 

00321 

00322 

00323 

00324 

00325 

00326 

00327 

00330 

00331 

00332 

00333 

00334 

00335 

00336 

00337 

00340 

00341 

00342 

00343 

00344 

00345 

00346 

00347 

00350 

00351 

00392 

00353 

00354 

00355 

00356 

00357 

00360 



000000 

107700 

060730 

070727 

060653 

014765 

006400 

074620 

074621 

074622 

074623 

074624 

074625 

074626 

074627 

074630 

074631 

074632 

074633 

074634 

074635 

074636 

074637 

006004 

102200 

024337 

074620 

006004 

102300 

074621 

006004 

103100 

102200 

074622 

006004 

102300 

024352 

074623 

006004 

102700 

102200 

074624 

006004 

102300 

024362 



BT 



SFC1 



SF81 



CLF1 

SFC2 



SFS2 



STC1 
5FC3 



SFS3 



NOP 
CLC 
IDA 
8T* 
IDA 
JSS 
CLB 
STB 
STB 
STB 
STB 
8TB 
8TB 
8TB 
STB 
STB 
8TB 
STB 
8TB 
8TB 
8TB 

STB 
STB 
INB 
SFC 
JMP 
STB 
INB 
8F8 
STB 
INB 
CLF 
SFC 
STB 
INB 
SFS 
JMP 
STB 
INB 
8TC 
SFC 
STB 
INB 
SFS 
JMP 



0,C 
SOYN 

OYN 
311 
SMPOP. 

El 
E2 

E3 

E4 

E5 

E6 

E7 

E10 

Ell 

E12 

Et3 

E14 

E15 

E16 

E17 

IA 



• ♦2 
El 


E2 



E3 



**2 
E4 



E5 


* + 2 



INITIALIZE, INTERRUPT OFF 
RESTORE 

OUTPUT CODE 
PRINT FIRST 

BT MESSAGE 
CLEAR 

ERROR 
BUFFER 



INCREMENT ERROR CODE 
FLAG CLEAR? 

NO. 

YES. ERROR 1 

INCREMENT ERROR CODE 
FLAG SET? 

NO. ERROR 2 

YES 
CLEAR FLAG 
FLAG CLEAR? 

NO. ERROR 3 

YES. 
FLAG SET? 

NO. 

YES. ERROR 4 

SET CONTROL 
FLAG CLEAR? 

NO. ERROR 5 

YES 
FLAG SET? 

NO. 



PA6E 0006 #01 



0229 

0230 

0231 

0232 

0233 

0234 

0235 

0236 

0237 

0238 

0239 

0240 

0241 

0242 

0243 

0244 

0245 

0246 

0247 

0248 

0249 

0250 

0251 

0252 

0253* 

0254* 

0255* 

0256 

0257 

0258 

0259 

0260 

0261 

0262 

0263 

0264 

0265 

0266 

0267 

0268 

0269 

0270 

0271 

0272 

0273 

0274 

0275 

0276 

0277 

0278 

0279 

0260 

0281 

0262* 

0263* 

0284* 

0285 



00361 
00362 
00363 
00364 

00365 
00366 
00367 
00370 
00371 
00372 
00373 
00374 
00375 
00376 
0i?l377 
00400 
00401 
00402 
00403 
00404 
00405 
00406 
00407 
00410 



074625 
006004 
060406 
070000 
102100 
102100 
000000 
000000 
074626 
006004 
060407 
070000 
102200 
024400 
074627 
006004 
102300 
074630 
006004 
074410 
024411 
024372 
014533 

000000 



STA2 



STM 



PI 

STA3 
SFC4 



SFS4 



Ul 
1IJ 

ERNO 



STB 
IN* 
LD* 
ST* 
STF 
STF 

NOP 
NOP 
STB 
INB 
ID* 
ST* 
SFC 
JMP 
8TS 
INB 
8FS 
STB 
INB 
STB 
JMP 
J MP 
JSB 
OCT 



E6 

Ul 






E7 

I I J 




**2 
E10 


EU 

ERNO 
TOUT 

Pi 

ILINT 





YES. ERROR 6 

PREPARE TO TEST 

INTERRUPT SYSTEM 
TURN ON INTERRUPT SYSTEM 
SET FLAG 
WAIT FOR 

INTERRUPT 
NO INTERRUPT - ERROR 7 
INTERRUPT ENTRY 
RENEW ILLEGAL 

INTERRUPT TRAP 
FLAG CLEAR? 
NO. 
YES. ERROR 10 

FLAG SET? 

NO. ERROR 11 

YES. 
STORE ERROR CODE 



ERROR CODE STORAGE 



THE FOLLOWING TESTS THE TIME FOR OUTPUTING ONE CHARACTER. 



00411 
00412 
00413 
00414 
00415 
00416 
00417 
00420 
00421 
00422 
00423 
00424 
00425 
00426 
00427 
00430 
00431 
00432 
00433 
00434 
00435 
00436 
00437 
00440 
00441 
00442 



000000 
107700 
102100 
060440 
102600 
064441 
103700 
106700 
014511 
024424 
024426 
064410 
074631 
034410 
000000 
064442 
014511 
024435 
064410 
074632 
034410 
000000 
024443 
100000 
150000 
177040 



TOLT 



OTA1 

STCC1 
CLCi 



roci 

TOC2 



NOP 
CLC 
8TP 
LD* 
OT* 
LDB 
STC 
CLC 
JSB 
JMP 
JMP 
LDS 
8TB 
1 S3 

NOP 
LDB 
JSB 
JMP 
LDB 
STB 
ISI 
NOP 
JMP 
OCT 
OCT 
GC7 



BrC 


ONN 


TOC1 

0,C 



TOS 

• ♦2 

*+3 

ERNO 

E12 

ERNO 

T0C2 

TOS 

**3 

ERNO 

E13 

ERNO 

DT 

1000^0 
1500*0 
1770*0 



INITIALIZE, INTERRUPT OFF 

INTERRUPT ON 

PUT INTO OUTPUT, NO 

PRINT, NO PUNCH MODE 
CHECK 

LOWER 
TIME 
FLAG SET? 
YES. DATA 
NO. 
ERROR 12 



LIMIT 

CLOCK TOO FAST 



INCREMENT ERROR 
CHECK UPPER 

TIME LIMIT 
FLAG SET? 
YES. TIMING OK 
NO. DATA CLOCK 

ERROR 13 
INCREMENT ERROR 



CODE 



TOO SLOW 



CODE 



OUTPUTrNO PRINT, NO PUNCH 
TIMEOUT CONSTANT 1 
TIMEOUT CONSTANT 2 



THE FOLLOWING 
00443 000000 



TESTS THE EIGHT BIT DATA SUFFER. 
DT NOP 



PA6E 0007 #01 



0206 


00444 


107700 




CLC 0,C 


INITIALIZE, INTERRUPT OFF 


0207 


00445 


002400 




CIA 




0208 


00446 


070465 


P2 


STA CURMn 


OUTPUT THE 


0289 


00447 


010463 




AND M8K2 


CURRENT 


0290 


00450 


102600 


OTA2 


OTA 


WORD 


0291 


00451 


106500 


LIB1 


LIS B 




0292 


00462 


050001 




CPA I 


INPUT ■ OUTPUT T 


0293 


00453 


024456 




JHF **3 


YES. 


0294 


00454 


060410 




LDA ERNO 


NO. ERROR 14 


0295 


00455 


070633 




0TA E14 




0296 


00456 


060465 




LDA CURWn 


INCREHENT 


0297 


00457 


002006 




INA,8ZA 


CURRENT WORD 


0296 


00460 


024446 




JHF F2 




0299 


00461 


034410 




131 ERNO 


INCREHENT ERROR CODE 


0300 


00462 


024467 




JHF CET 




0301 


00463 


000377 


M3K2 


OCT 377 




0302 


00464 


000200 


M3K3 


OCT 200 




0303 


00465 


000000 


CURWD 


OCT 




0304 


00466 


000000 


NBE 


OCT 




0305* 












0306* 


THE F0LL0WIN8 


TESTS 


THE CLOCK ENABLE FL!P«FLOP 


0307* 












0306 


00467 


107700 


CET 


CLC 8,C 


INITIALIZE, INTERRUPT OFF 


0309 


00470 


060440 




LDA ONN 


PUT BUFFER INTO "OUTPUT, NO 


0310 


00471 


102600 


OTA3 


OTA 


PRINT, NO PUNCH* STATE 


0311 


00472 


106500 


HB2 


LIB 


FLIP-FLOP 


0312 


00473 


006021 




8S0,RS8 


SETT 


0313 


00474 


024477 




JHF «*3 


NO. 


0314 


00475 


060410 




LDA ERNO 


YES. ERROR 15 


0315 


00476 


070634 




STA E15 




0316 


00477 


034410 




IS1 ERNO 


INCREHENT ERROR CODE 


0317 


00500 


102700 


STC2 


9TC 


SET FLIP-FLOP 


6316 


00801 


106600 


LIB3 


LIS 


FLIP-FLOP 


0319 


00502 


006020 




8SS 


SETT 


0320 


00503 


024506 




JMF *+3 


YES. 


0321 


00504 


060410 




LDA ERNO 


NO. ERROR 16 


0322 


00505 


070635 




STA E16 




0323 


00506 


107700 




CLC 0,C 


INITIALIZE, INTERRUPT OFF 


0324 


00507 


014522 




JSB EBH 


HALT AT ERROR BUFFER? 


0325 


00510 


024546 




JHF POUT 


NO. 


0326* 












0327* 


FLAO TIHCOUT SUBROUTINE 




0326* 












0329* 


TINEOUT CONSTANT IN 


B 




0330* 


IF "FU6" 0EFORE TIHtOUT, EXIT TO 


TOS. IF NOT, 


0331* 


EXIT TO T08 ♦ 


1. ONE ITERATION * 


6.4 HICROSEC. 


0332* 












0333 


005U 


000000 


TOS 


NOF 


ENTER 8U0ROUT1NE 


0334 


00612 


102300 


3F85 


IN B 


FLAB SETt 


0335 


00613 


024615 




JHP «*2 




0336 


00614 


124511 




JHF T08,l 


YES. EXIT THROU0H TOS 


0337 


00516 


006006 




INB,SZB 


NO, TIHEOUT VETT 


0336 


00516 


024512 




JHF 8FS5 


NO. REPEAT 


0339 


00517 


034511 




181 TOS 


YES. EXIT 


0340 


00520 


000000 




NOF 


THROUQH 


0341 


00521 


124511 




JHF TOS,l 


TOS ♦ 1 


0342* 
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0343*ERROR BUFFER HALT SUBROLT1NE 
0344* 

0345 00622 000000 E0t- NOP 

0346 00523 070532 STA A31 

0347 00524 014145 JSS MODE 
0340 00525 000175 LDA BIT1 

0349 00526 000010 SLA 

0350 00527 014614 JSS POF 

0351 00530 060532 LDA AS1 

0352 00531 124522 JMF EBH,I 

0353 00532 000000 AS1 OCT 
0354* 

0355*ILLE3AL INTERRUPT SUBROUTINE 

0356* 

0357*FOR AN ILLEGAL TTY INTERRUPT, 

0358* 

0359 00533 000000 HINT NOP 

0360 00534 070543 STA A32 

0361 00535 060533 IDA *-2 

0362 00536 070637 8TA IA 

0363 00537 060544 LDA IE 

0364 00540 070636 0TA E17 

0365 00541 060543 LDA AS2 

0366 00542 124533 JMP ILINT 

0367 00543 000000 AS2 OCT 

0368 00544 000017 IE OCT 17 
0369* 

0370*TME FOLLOWING PRIMS OUT THE » 
0371*IN CASE OF FAILURE TO PRINT Oil 
0372*HALTS AT THE BE0IKN1N0 OF THE 
0373*PRESSIN0 "DISPLAY MEMORY* WILi 
0374* 

0375 00545 000000 POLT NOP 

0376 00546 107700 CLC 0,C 

0377 00547 006400 CL8 
0376 00550 014511 J SB T08 
0379 00551 024553 JMP **2 
0360 00652 014614 JSB POF 
0381 00553 060666 LDA 8C2 

0302 00554 070666 6TA M16 

0303 00555 060667 LDA 813 
0364 00556 070557 0TA P4 

0385 00557 064620 P4 LDB El 

0386 00560 034557 ISI ••! 

0387 00561 006002 SZB 
0366 00562 024566 JMP **4 

0369 00563 034666 181 M16 

0390 00564 024557 JMP P4 

0391 00565 024574 JMP P5 

0392 00866 060670 LDA E 

0393 00567 014706 JSB OYNA 

0394 00570 014733 JSS POUT* 

0395 00571 014752 JSB EOL 

0396 00572 014522 JSB EBH 

0397 00573 024563 JMF *-10B 

0398 00574 064636 P5 LDB E17 

0399 00575 006003 8ZB,R3S 



ENTER SUBROUTINE 
STORE A 

CHECK 8W. RES, 
HALT AT 

ERROR BUFFER? 
YES. 

NO. RESTORE A 
EXIT SUBROUTINE 
TEMPORARY ST0RA6E 



THE PROSRAM ADDRESS IS SAVED. 

ENTER SUBROUTINE 

STORE A 

STORE PROGRAM ADDRESS 

STORE 

ERROR 17 
RESTORE A 
,1 EXIT SUBROUTINE 
TEMPORARY STORAGE 



E3ULT8 OF THE BASIC TEST. 
T, THE PROGRAM 
ERROR BUFFER. 
SHOW WHICH ERRORS OCCURED. 



INITIALIZE, INTERRUPT OFF 

FLAG SETT 
YES. 

NO. HALT AT ERROR BUFFER 
PREPARE TO 
PRINT OUT 
ERROR CODES 

LOAD B WITH 

ERROR STORAGE 
ZERO? 
NO. 

YES. PARTIALLY DONE? 
NO. 

YES. CHECK INTERRUPT ERRORS 
PRINT 

OUT 
ERROR 
CODE 
HALT AT ERROR BUFFER? 
NO. 
E17 - 0? 
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0400 

0401 

0402 

0403 

0404 

0405 

0406 

0407 

0406 

0409 

0410 

0411 

0412 

0413 

0414 

041S 

0416 

0417 

0416* 

0419* 

0420* 

0421 

0422 

0423 

0424 

0425 

0426 

0427 

0426 

0429 

0430 

0431 

0432 

0433 

0434 

0435 

0436 

0437 

0436 

0439* 

0440 



00576 
00577 
00600 
00601 
00602 
C0603 
00604 
00606 
00606 
00607 
00610 
00611 
00612 
00613 
00614 
00615 
00616 
00617 



024610 
060670 
014706 
014733 
060705 
015003 
•60637 
•15026 
•14752 
014762 
060664 
014765 
014522 
124304 
000000 
060614 
064614 
102055 



ERROR BUFFER 



0441 

0442 
0443 



00620 

09621 
00622 
00623 
00624 
00625 
00626 
00627 
00630 
00631 
00632 
00633 
00634 
00635 
00636 
00637 
00640 
00641 

00642 
00643 
00644 
00645 
00646 
00647 
00650 
00651 
00652 
00653 
00654 
00655 
••666 
00657 
00660 
00661 
00662 



000900 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
177777 
024124 

041105 
043511 
047040 
041101 
051511 
041440 
052105 
051524 
••0000 
060642 
042616 
042040 
041101 
051511 
041440 
052105 
051524 



JMP P0 

LD* E 

J86 OYNA 

J80 POUT* 

LD* 614 

JS0 UFO 

LDA U 

J80 CPA 

J80 EOL 

J80 EOL 

P6 LDA 812 

JSI SHFOr. 

JS0 EBH 

JMP BT f I 

POP *OF 

LDA *«1 

LD0 *-2 

»LT 55B 



El OCT 

E2 OCT 

E3 OCT 

E4 OCT 

E5 OCT 

E6 OCT 

E7 OCT 

Ell OCT 

Ell OCT 

Eta OCT 

E13 OCT 

E14 OCT 

E18 OCT 

E16 OCT 

El? OCT 

1A OCT 

OCT 177777 
JMP MP1 



YE8. 
NO, 

PRINT OUT 
ERROR CODE 
AND 

PR06RAH ADDRESS 
WHEN ERROR 
OCCURRED 
LINE FEED 
LINE FEED 
FRINT SECOND 
BT HE88A8E 
HALT AT ERROR BUFFER? 
NO. EXIT ROUTINE 

FUT PROGRAM ADDR88S 
FOR FRINT FAILURE 
INTO A AND B 



CLC 0,C 
CLC 0,C 
CLF TTV 
CLF TTY 
CLF TTY AND STC 



SFC TRUE AFTER 

SFS FALSE AFTER 

SFC FALSE AFTER 

SFS TRUE AFTER 

SFC FALSE AFTER 

SFS TRUE AFTER CLF TTY AND STC 

NO INTERRUPT AFTER STC TTY,STF 

SFC TRUE AFTER INTERRUPT 

SFS FALSE AFTER INTERRUPT 

DATA CLOCK ON TTY BOARD TOO FAST 

DATA CLOCK ON TTY BOARD TOO SLOW 

DATA BUFFER ERROR 

CLOCK ENABLE FLIP-FLOP SET 

CLOCK ENABLE FLIP-FLOP NOT SET 

ILLEGAL INTERRUPT PROM TELETYPE 

PROORAH ADDRESS AT TINE OF E17 

ERROR BUFFER TERNINAITON 

RETURN TO MAIN PROORAH 



BTM ASO 8,BlEaiN BASIC TEST 



OCT 

SI1 LDA BTM1 

BT*2 ASC 7,ENn BASIC TEST 



PAGE 0010 #01 



0444 


00663 


000000 




OCT 







0445 


00664 


060654 


812 


ID* 


0TM2 




0446 


00665 


177762 


scs 


OCT 


1777A2 




0447 


00666 


000000 


Hie 


OCT 







0448 


00667 


064620 


313 


LD0 


El 




0449 


00670 


000305 


E 


OCT 


305 




0490 


00671 


020040 


PRAD 


A8C 


11, PROGRAM ADDRESS ■ 




00672 


020120 












00673 


051117 












00674 


043522 












B0675 


040515 












00676 


020101 












00677 


042104 












00700 


051105 












007PI1 


051523 












00702 


020075 












00703 


020040 










0451 


00704 


000000 




OCT 







0452 


00705 


060671 


814 


IDA 


PRAD 




0453* 














0454* 


PRINT LEAST $ie«IFIC*h? 1 BITS OF 


A. 


0455* 














0456 


00706 


000000 


OVKA 


NOP 




ENTER SUBROUTINE 


0457 


99797 


107700 




CLC 


0,C 


INITIALIZE, INTERRUPT OFF 


0456 


00710 


070731 




0TA 


A03 


STORE A 


0459 


00711 


074732 




0T0 


081 


STORE 


0460 


00712 


060727 




L0A 


OVN 


PUT BUFFER INTO OUTPUT 


0461 


00713 


102600 


0TA4 


OTA 





AND PRINT NODE 


0462 


00714 


060731 




LD* 


AS3 


RESTORE A 


0463 


00715 


•10463 




ANE 


MSK2 


OUTPUT LEAST 


0464 


00710 


102600 


0TA5 


OTA 





SIGNIFICANT 6 


0465 


00717 


103700 


8TCC2 


STC 


0,C 


BITS OF A 


0466 


00720 


006400 




CL8 






0467 


00721 


014511 




J88 


TOS 


FLAG SETT 


0468 


00722 


024724 




JMP 


• ♦2 




0469 


00723 


014614 




JSI 


POP 


NO. HALT AT ERROR BUFFER 


0470 


00724 


060731 




LDA 


AS3 


YES. RESTORE A 


0471 


00725 


064732 




LDI 


8S1 


RESTORE B 


0472 


00726 


124706 




JMP 


OYNA.I 


EXIT SUBROUTINE 


0473 


00727 


120000 


<m 


OCT 


1200M0 


OUTPUT, PRINT, NO PUNCH 


0474 


00730 


120000 


SOYN 


OCT 


1200*0 




0475 


00731 


000000 


ASS 


OCT 





TEMPORARY STORAGE 


0476 


00732 


000000 


881 


OCT 





TEMPORARY STORAGE 


0477* 














0470* 


PRINT OUT TWO 


OCTAL 


NUMBERS 




0479« 














0400 


00733 


000000 


P0LT2 


KOF 




ENTER SUBROUTINE 


0401 


00734 


060001 




LD* 


1 


OUTPUT 


0462 


00735 


001100 




409 




FIRST 


0403 


00736 


001100 




ARS 




NUMBER 


0464 


00737 


001100 




ARI 






0405 


00740 


010751 




ANB 


MSK5 




0486 


00741 


030760 




IOC 


MSK4 




0487 


00742 


014706 




jsa 


OVNA 




0488 


00743 


060001 




LD* 


1 


OUTPUT 


0489 


00744 


010751 




ANT 


MSK5 


SECOND 


0490 


00749 


030750 




10B 


MSK4 


NUMBER 
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0401 


00746 


014706 




JS8 


OYNA 




0492 


00747 


124733 




JMF 


POUT»,I 


EXIT SUBROUTINE 


0493 


00750 


000260 


MSM 


OCT 


260 




0494 


00751 


000007 


MSK5 


OCT 


7 




0495* 














0496* 


END OF 


LINE SUBROLTINF. 






0497* 














049S 


00752 


000000 


EOL 


NOR 




ENTER SUSROUTINE 


0499 


00753 


070762 




8TA 


ASA 


STORE A 


0500 


00754 


060763 




LDA 


CR 


CARRIAOE 


0501 


00755 


014706 




JSB 


OYNA 


RETURN 


0502 


00756 


060764 




LDA 


LF 


LINE 


0503 


00757 


014706 




J 80 


OYNA 


FEED 


0504 


00760 


060762 




LDA 


A84 


RESTORE A 


0505 


00761 


124792 




JMP 


EOL,» 


EXIT SUBROUI1NE 


0506 


00762 


000000 


ASA 


OCT 





TEMPORARY STORAGE 


0507 


00763 


000215 


CR 


OCT 


215 




0508 


00764 


000212 


IF 


OCT 


212 




0509* 














0510* 


SUPPRESS MESSASE PRI«TO*JT SHEfSK 


SUBROUTINE 


0511* 














0512 


00765 


000000 


8MFOC 


NOR 




ENTER SUSROUTINE 


0513 


00766 


071002 




8TA 


A80 


STORE A 


0514 


00767 


014149 




J 80 


NODE 


CHECK 0N. REG. 


0919 


99779 


060176 




LDA 


9IT2 


SUPPRESS EXCESS 


0916 


00771 


002011 




• LA, 


,083 


PRINTING? 


0917 


00772 


024779 




JNR 


•♦3 


NO. 


0916 


00773 


•61*02 




LDA 


A69 


YES. RESTORE A 


0019 


00774 


124769 




JMR 


SMPOCI 


EXIT SUSROUTINE 


0020 


00779 


•61002 




LDA 


A89 


RESTORE A 


0021 


00776 


015003 




J8S 


HPO 


PRINT MESSAGE 


0522 


00777 


014792 




J 80 


EOL 


LINE FEED 


0923 


01000 


014792 




J 80 


EOL 


LINE FEED 


0024 


01001 


124769 




JMR 


8MP0rt,I 


EXIT SUSROUTINE 


0929 


01002 


000000 


ASS 


OCT 





TEMPORARY STORAGE 


0926* 














0927* 


MESSAGE PRINTOUT SUBROUTINE 




0926* 














0929 


01003 


000000 


MPC 


NOR 




ENTER SUSROUTINE 


0930 


• 1004 


•71900 




0TA 


•♦1 




0031 


01000 


060000 




LDA 





LOAD A WORD 


0932 


01006 


035005 




181 


*•! 




0933 


• 1007 


002003 




8ZA, 


,R88 


WORD • 0? 


0034 


• 1010 


129003 




JNR 


MPOrf 


YES, EXIT SUSROUTINE 


0939 


01011 


019013 




J 88 


PACO 


NO. PRINT THE NORD 


0936 


01012 


029005 




JNR 


♦ -9 


REPEAT FOR NEXT NORD 


0937* 














0830*1 


RACKED 


ASCII CHARACTER OUTPUT SUSROUTINE 


0039*HO8T SIGNIFICANT 1 B 


ITS OF A REGISTER PRINTED FIRST. 


0940* 














0941 


01013 


000000 


PACO 


NOR 




ENTER SUBROUTINE 


0942 


01014 


071025 




8TA 


A86 


STORE A 


0943 


01010 


001700 




• LP 




PRINT 


0944 


01016 


001700 




*LR 




FIRST 


0549 


01017 


010463 




AN8 


MSK2 


CHARACTER 


0946 


01020 


014706 




JSi 


OYNA 




0547 


01021 


001025 




LDA 


AS6 


PRINT 
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0548 

0549 

0550 

0551 

0592* 

0553*OCTAL 

0554* 



01022 
01(929 
01024 
01025 



010463 
014706 
129013 
000000 



A36 



ANt HSK2 

JSB OYNA 

JMP PACO.I 

OCT 



PRINTOUT OF A 



0555 

0556 

0957 

0558 

0559 

0560 

0561 

0562 

0563 

0564 

0565 

0566 

0567 

0566 

0569* 

§870*NEXT 

0571* 

0572 



01026 
01027 
01030 
01031 
01032 
01033 
01034 
01035 
01036 
01037 
01040 
01041 
01042 
01043 



000000 
001200 
071042 
011043 
030750 
014706 
015044 
015044 
015044 
015044 
015044 
125026 
000000 
000001 



OPA 



AS7 

MSK6 



NOP 
PAL 
• TA 

AND 
!OR 
JS0 
JSB 
JSB 
JSB 
JSB 
JSB 
JMP 
OCT 
OCT 



A 87 

M8K6 

MSK4 

OYNA 

NXT 

NXT 

NXT 

NXT 

NXT 

OPA,l 



1 



OCTAL CHARACTER OUTPUT 



01044 
01045 
01046 
01047 
01050 
01051 
01052 
01053 
01054 
01055 



000000 
061042 
001200 
001200 
001200 
071042 
010751 
030750 
014706 
125044 



NXT 



0573 

0574 

0575 

0576 

0577 

0578 

0579 

0580 

0581 

0682* 

0563* 

0584* 

0585*PUNCH AND READ ROlTlNE 

0586* 

0587*TESTS TAPE PUNCH AND 

0588*BY OUTPUT1NO ALL COM 

0589*EIOHT BITS AND READI 

0590* 

000000 

107700 

006400 

014511 

025064 

014614 

061250 

014765 

061070 

065070 

102002 

061143 

070727 

015264 



NOP 
ID* 
RAL 
RAL 
RAL 
8TA 
ANt 
!OS 
JSB 
JMP 



AS7 



AS7 

HSK5 
M8K4 
OYNA 
NXT,f 



TAPE REAnER 
BINATIONS OF 
N6 THEM BACK, 



0591 
0592 
0593 
0594 
0595 
0596 
0597 
0596 
0599 
0600 
0601 
0602 
K603 
0604 



01056 
01057 
01060 
01061 
01062 
01063 
01064 
01065 
01066 
01067 
01070 
01071 
01M72 
01073 



PAR 



NOP 
CLC 
CLB 
JSB 
JMP 
JSB 
LDA 
JS0 
LDA 
LDB 
HLT 
LDA 
STA 
JSB 



0,C 

T08 
•♦2 

POF 
S17 
SMPOft 
•♦2 

• ♦1 
2 

ONY 
OYN 
1EROS 



SECOND 

CHARACTER 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 

STORE A 
PRINT 
FIRST 
NUMBER 
PRINT 
NEXT 
FIVE 

NUMBERS 

EXIT SUBROUTINE 
TEMPORARY ST0RA8E 



ENTER SUBROUTINE 
PREPARE 
THE 
NEXT 

NUMBER 
FOR 

0UTPUTIN8 

OUTPUT 

EXIT SUBROUTINE 



ENTER ROUTINE 
INITIALIZE, INTERRUPT OFF 

FLA6 SET? 

YES. 

NO, HALT AT ERROR BUFFER 

PRINT FIRST 

PAR MESSAGE 
MALT TO 

TURN ON 
PUNCH 
PREPARE TO 

PJNCH TAPE 
PUNCH LEADER 
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0605 

0606 

0607 

0618 

0600 

0610 

0611 

0612 

0613 

0614 

0619 

0616 

0617 

0618 

0619 

0680 

0621 

0622 

0623 

0624 

0625 

0626 

0627 

0626 

0629 

0630 

0631 

0632 

0633 

0634 

0635 

0636 

0637 

0636 

0639 

0640 

0641 

0642 

0643 

0644 

0645 

0646 

0647 

0646 

0649 

0650* 

0651* 

0652* 

0663 

0664 

0655 

0656 

0657 

0656 

0659 

0660 

0661 



01074 003400 CCA 

01075 010463 ANE P-SK2 
01976 014706 JSi CYNA 
01077 002400 CLA 
01100 015274 J80 .6ICM 
(4101 015274 J8i .64CW 

01102 061144 IDA OYY 

01103 070727 0TA OYN 

01104 000762 LDA A 84 

01105 016274 JSi .64C« 
0U06 015274 JSi .64CH 
01107 015264 JSi IEI*0« 

01110 015264 jsi zeiroa 

01111 015264 JS0 ZERO* 

01112 015151 JSi FARE 

01113 061115 LDA •♦» 

01114 065115 LDS •♦! 

01115 102003 HLT 3 

01116 061150 LDA INN 

01117 070727 iTA OYN 

01120 002400 CLA 

01121 014706 JS8 OYNA 

01122 106500 LIB4 Lf0 

01123 006003 S1B,R8S 

01124 025121 JHP *•* 

01125 015305 JSS R64CM 

01126 061145 LDA IYN 

01127 070727 8TA OYN 

01130 061341 LDA A811 

01131 015305 JSi R64CM 

01132 061146 LDA INY 

01133 070727 STA OYN 

01134 061341 LDA ASH 
01136 015305 JSi R64CH 

01136 061147 LDA IYY 

01137 070727 STA OYN 

01140 061341 LDA ASH 

01141 015305 JSi R64CM 

01142 025161 JMP P7 

01143 110000 ONY OCT 110000 

01144 130000 OYY OCT 1310*0 
01146 160000 IYN OCT 1600*0 

01146 150000 INT OCT 1500*0 

01147 170000 IYY OCT 1710*0 
01150 140000 1^ OCT 1400*0 

PUNCH AND READ EXIT SUBROUTINE 



01151 
01152 
01153 
01154 
01156 
01136 
01157 
0116(1 
01161 



000000 
071107 
014145 
060200 

002011 
025161 

061167 
125151 
060730 



PARE 



P7 



NOP 

0TA ASS 

JSS NODE 

LDA 8IT4 
•LA,fiSS 

JMP **3 

IDA ASB 

JMP PARE, 

IDA SOYN 



OUTPUT ALL ONES 
AS A 6E8INNIN6 
INDICATOR 
PUNCH 
ALL 

COMBINATIONS 

OP EI0HT 

BITS 



PUNCH 
TRAILER 



EXIT ROUTINE* 
NO. HALT TO 

LOAD TAPE 
INTO READER 
PREPARE TO 

READ 
TAPE 
READ A ( 

CHARACTER 
CHARACTER ■ 0T 
YES. READ NEXT CHARACTER 
NO. READ FIRST BLOCK 



READ SECOND BLOCK 



READ THIRD BLOCK 



READ FOURTH BLOCK 

EXIT ROUTINE 

OUTPUT, NO PRINT, PUNCH 

OUTPUT, PRINT, PUNCH 

INPUT, PRINT, NO PUNCH 

INPUT, NO PRINT, PUNCH 

INPUT, PRINT, PUNCH 

INPUT, NO PRINT, NO PUNCH 



ENTER SUBROUTINE 
STORE A 

CHECK 8*. RE0. 
EXIT THIS 

ROUTINE? 
YES 

NO.* RESTORE A 
EXIT SUBROUTINE 
RESTORE 
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0662 


01162 070727 




ST* OYN 


OUTPUT CODE 


0663 


01163 014782 




JSi EOL 


LINE FEED 


0664 


01164 061263 




IDA SIS 


PRINT SECOND 


0665 


01166 014766 




JSS SMPOn 


PAR NES8A0E 


0666 


01166 126066 




JMP PAR,! 


EXIT ROUTINE 


0667 01167 000000 
0666* 


AS6 


OCt 


TEMPORARY STORAGE 


0669*PRINT OUT ERRORS ROUTINf 




0670* 








0671 


01170 000000 


POE 


fcOP 


ENTER SUBROUTINE 


0672 


01171 071214 




STA AS9 


STORE A 


0673 


01172 060727 




LDA OYN 


SAVE 


0674 


01173 071216 




STA AS10 


STATE 


0675 


01174 060730 




LDA SOYN 




0676 


01175 070727 




8TA OYN 




0677 


01176 014782 




JSS EOL 


LINE FEED 


0676 


01177 061224 




LDA 815 


PRINT "OUTPUT ■" 


0679 


01200 018003 




JSS MPO 




0660 


01201 061214 




LDA A89 


RESTORE A 


0661 


01202 016026 




JSi OPA 


PRINT OCTAL NUMBER 


0662 


01203 061234 




LDA SI6 


PRINT "INPUT ■" 


0663 


01204 015003 




JSS MPO 




0664 


01205 060001 




LDA 1 


PRINT OCTAL 


0605 


01206 018026 




JSS OPA 


NUMBER 


0606 


01207 014782 




JSS EOL 


LINE FEED 


0607 


01210 061218 




LDA A810 


RESTORE 


0660 


01211 070727 




STA OYN 


STATE 


0609 


01212 061214 




LDA AS9 


RESTORE A 


0690 


01213 126170 




JMP POE,l 


EXIT SUBROUTINE 


0691 


01214 000000 


ASS 


OCT 


TEMPORARY STORAGE 


0692 


01216 000000 


A810 


OCT 


TEMPORARY STORASE 


0693 


01216 047028 

01217 082120 

01220 062824 

01221 020078 

01222 020048 


00 


A3C 6,0UTPUT 




0694 


01223 000000 




OCT 




0698 


01224 061216 


SIB 


LDA 00 




0696 


01226 020040 


01 


A8C 6, INPUT « 




01226 020040 










01227 044616 










01230 000128 










01231 062040 










01232 036440 








0097 


01233 000000 




OCT 




0698 


01234 061226 


816 


LDA 01 




0699 


01236 041108 

01236 043811 

01237 047040 

01240 080128 

01241 047103 

01242 044040 

01243 040816 

01244 042040 
01246 061105 
01246 040504 


PARM1 


A8C 10,B*9IN 


PUNCH AND READ 


0700 


01247 000000 




OCT 
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0701 
0702 



0703 
0704 
0705* 
0706* 
9797* 
0708 
'09 
10 
0711 
0712 
0713 
0714 
0715 
0716* 
0717* 
0718* 
0719 
0720 
0721 
0722 
0723 
0724 
0725 
0726 
0727 
0728* 
0729* 
0730* 
0731 
0732 
0733 
0734 
0735 
0736 
0737 
0738 
0739 
0740 
0741 
0742 
0743 
0744 
0745 
0746 
0747 
0748 
0749 



01250 
01251 
01252 
01253 
01254 
01255 
01256 
01257 
01260 
01261 
01262 
01263 



061235 
042516 
042040 
050125 
047103 
044040 
040516 
042040 
051105 
040504 
000000 
061251 



S!7 

PAKM2 



ASC 



PARMi 

9,EHr\ PUNCH 



AND READ 



s i e 



cct 

ID* 





PARM9 



OUTPUT BLANK TAPE 



01264 
01265 
01266 
01267 
01270 
01271 
01272 
01273 



000000 

002400 
06b273 
014706 
006006 
025267 
125264 
177740 



ZEKOS 



8C3 



MOP 

CL* 

LDB SC3 

JSB OYNA 

INRrSZB 

JMP *-2 

JHP ZERO*, I 

OCT 177740 



ENTER SUBROUTINE 



OUTPUT ZERO 

32 ZEROS? 

NO. 

YES. EXIT SUBROUTINE 



INCREMENT AND OUTPUT A REG. 64 TIMES 



01274 000000 .64CH NOP 

01275 065304 I Di 8C4 

01276 014706 JSB OYNA 

01277 002004 INA 

01300 006006 1NS,8ZB 

01301 025276 JMP *-3 

01302 014752 JS8 EOL 

01303 125274 JMP ,64C*,I 

01304 177700 SC4 OCT 1777«0 

READ AND CHECK 64 CHARACTERS 



01305 
01306 
01307 
01310 
01311 
01312 
01313 
01314 
01315 
01316 
01317 
01320 
01321 
01322 
01323 
01324 
01325 
01326 
01327 



000000 
065304 
075340 
-4B14706 
106500 
015151 
050001 
025316 
015170 
002004 
035340 
025310 
071341 
060763 
014706 
106500 
050001 
025330 
015170 



R64CH 



P8 
LI65 



LI66 



NOP 
LDB 
8TB 
JSB 
LI* 
JS«f 
CPA 
JMP 
JSB 
INA 
ISI 
JMP 
ST* 
LD* 
JSB 
LIB 
CPA 
JMP 
JSB 



5C4 

M64 

OYNA 



PARE 

1 

• ♦2 

POE 

M64 

P8 

ASH 

CR 

OYNA 

1 

**2 
POE 



ENTER SUBROUTINE 

RESET COUNTER 

OUTPUT A 

INCREMENT OUTPUT WORD 

64 CHARACTERS? 

NO. 

YES 

EXIT ROUTINE 



ENTER SUBROUTINE 
RESET 

CHARACTER COUNTER 
READ A 

CHARACTER 
EXIT ROUTINE? 
NO. ERROR? 
NO. 

YES. PRINT OUT ERROR 
INCREMENT REFERENCE 
64 CHARACTERS? 
NO. 

YES. STORE A 
CHECK FOR 

CARRIAGE 
RETURN 
ERROR? 
NO. 
YES, PRINT OUT ERROR 
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0750 


01330 


060764 




LDA 


LP 


CHECK FOR 


0751 


01331 


014706 




JSB 


OYNA 


LINE 


0752 


01332 


106500 


LIB7 


LIB 





FEED 


0753 


01333 


050001 




CPA 


1 


ERROR? 


0754 


01334 


025336 




JMF 


• ♦2 


NO. 


0755 


01335 


015170 




JSB 


POE 


YES. PRINT OUT ERROR 


0756 


01336 


061341 




LDA 


ASH 


RESTORE A 


0757 


01337 


125305 




JMF 


R64CH, I 


EXIT SUBROUTINE 


0758 


01340 


177700 


H64 


OCT 


1777*0 




0759 


01341 


000000 


AS11 


CCt 





TEMPORARY STORAGE 


0760* 














0761* 














0762* 














0763* 


PRINT i 


AND KEYBOARt ROUTINE 




0764* 














0765 


01342 


000000 


PAK 


*OP 




ENTER ROUTINE 


0766 


01343 


107700 




CLC 


e,c 


INITIALIZE, INTERRUPT OFF 


0767 


01344 


060730 




LDA 


SOYN 


PREPARE 


0768 


01345 


070727 




STA 


OYN 


TO PRINT 


0769 


01346 


061423 




LDA 


SI9 


PRINT FIRST 


0770 


01347 


014765 




JSB 


SMPOr 


PAK MESSAGE 


0771 


01350 


015464 




JSB 


PRALt 


PRINT 64 ASCII CHARACTERS 


0772 


01351 


015464 




JSB 


PRALI 


PRINT 64 ASCII CHARACTERS 


0773 


01352 


014752 




JSB 


EOL 


LINE FEED 


0774 


01353 


015372 




JSB 


PAKE 


EXIT ROUTINE? 


0775 


01354 


061446 




LDA 


SI10 


NO. PRINT SECOND 


0776 


01355 


014765 




JSB 


SMPOC 


PAK MESSAGE 


0777 


01356 


061150 


P9 


LDA 


INN 


PREPARE TO READ 


0778 


01357 


102600 


UTA6 


OTA 





IN FROM KEYBOARD 


0779 


01360 


015372 


Pie 


JSB 


PAKE 


EXIT ROUTINE? 


0780 


01361 


103700 


STCC3 


8TC 


0,C 


NO. WAIT 


0781 


01362 


006400 




CLB 




FOR INPUT 


0782 


01363 


014511 




JSB 


TOS 


ANY INPUT? 


0783 


01364 


025366 




JMF 


• ♦2 


YES. 


0784 


01365 


025360 




JMF 


P10 


NO. 


0785 


01366 


106500 


LIES 


LIB 





LOAD DATA INTO B 


0786 


01367 


060001 




LDA 


1 


PUT B INTO A 


0787 


01370 


014706 




JSB 


OYNA 


OUTPUT A 


07 88 


01371 


025356 




JMF 


P9 


READ NEXT CHARACTER 


0789* 














0790*i 


PRINT AND KEYBOARt EXIT 






0791* 














0792 


01372 


000000 


PAKE 


MO? 




ENTER SUBROUTINE 


0793 


01373 


071214 




STA 


AS9 


STORE A 


0794 


01374 


014145 




JSB 


MODE 


CHECK SH. REG. 


0795 


01375 


060201 




LDA 


BIT5 


EXIT THIS 


0796 


01376 


002011 




SLA, 


RSS 


ROUTINE? 


0797 


01377 


025402 




JMF 


• ♦3 


YES. 


0798 


01400 


061214 




LD4 


AS9 


NO. RESTORE A 


0799 


01401 


125372 




JMP 


PAKE. I 


EXIT SUBROUTINE 


0800 


01402 


014752 




JSB 


EOL 




0801 


01403 


061463 




t DA 


Sill 


PRINT THIRD 


0802 


01404 


014765 




JSB 


SMPOn 


PAK MESSAGE 


0803 


01405 


125342 




J MP 


PAK,I 


EXIT ROUTINE 


0804 


01406 
4)1407 
01410 


041 105 
(44351 1 

047040 


PAKMl 


asc 


12,B?GIN 


PRINT AND KEYBOARD 
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01411 050122 

01412 044516 

01413 052040 

01414 040516 

01415 042043 

01416 045505 

01417 054502 

01420 047501 

01421 051104 

0805 01422 000000 OCt 

0806 01423 061406 SIC LDA PAKMi 

0807 01424 052523 PAKM2 A8C 17..U8E KEYBOARD SLOWLY (5 CHS. /SEC.) 

01425 042440 

01426 045505 

01427 054502 

01430 047501 

01431 051104 

01432 020123 

01433 046117 

01434 053514 

01435 054440 

01436 024065 

01437 020103 

01440 044123 

01441 027057 

01442 051505 

01443 041456 

01444 024440 

0808 01445 000000 CCT 
0609 01446 061424 SI10 CD* PAKM9 

0810 01447 042516 PAKM3 ASC 11, EnD PRINT AND KEYBOARD 

01450 042040 

01451 050122 

01452 044516 

01453 052040 

01454 040516 

01455 042040 

01456 045505 

01457 054502 

01460 047501 

01461 051104 

0811 01462 000000 CCT 

0812 01463 061447 Sill CD* PAKM* 
0813* 

0814*PRINT ALL CHARACTERS SUBROUTINE 

0615* 

0816 01464 000000 PRALL NCP ENTER SUBROUTINE 

0617 01465 061472 LD* SC5 PRINT FIRST 

0818 01466 015474 JS§ .32C* LINE OF CHARACTERS 

0619 01467 061473 ID* SC6 PRINT SECOND 

0820 01470 015474 JSB .32C* LINE OF CHARACTERS 

0821 01471 125464 JM? PRALi,I EXIT SUBROUTINE 

0822 01472 000300 SCS CCT 300 

0823 01473 000240 SC< CCT 240 
0824* 

0825*PRINT 32 CHARACTERS SbBPOUTINP 
0826* 
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0827 01474 000000 .32CH NOP ENTER SUBROUTINE 

0828 01475 075506 STB BS2 STORE B 

0829 01476 065273 LDe 8C3 RESET COUNTER 

0830 01477 014706 JSB CYNA PRINT A 

0831 01500 002004 INA INCREMENT A 

0832 01501 006006 1NB,SZ8 32 CHARACTERS? 

0833 01502 025477 JMF *-3 NO. PRINT NEXT CHARACTER 

0834 01503 014752 .JSB EOL YES. LINE FEED 

0835 01504 065506 LDB BS2 RESTORE B 

0836 01505 125474 JMF ,32Cw,I EXIT SUBROUTINE 

0837 01506 000000 BS2 OC1 TEMPORARY STORAGE 

0838 fNt 
** NO ERRORS* 



2116A/B BUFFERED TELEPRINTER TEST 



BINARY TAPE - HP20417C 
SOURCE TAPE - HP20471C 
SOURCE LISTING - HP20417CL 



PAGE 0001 



II AS*8,A.B.L 

** NO ERRORS* 



£**f*7C 
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0001 

0002* 

0003* 

0004* 

0005* 

0006* 

0007* 

0008* 

0009* 

0010* 

0011* 

0012* 

0013* 

0014* 

0015* 

0016* 

0017* 

0016* 

0019* 

0020* 

0021* 

0022* 

0023* 

0024* 

0025 

0026 

0027 

0028 

0029 

0030 

0031 

0032 

0033 

0034 

0035 

0036 

0037 

0036 

0039 

0040 

0041 

0042 

0043 

0044 

0045 

0046 

0047 

0048 

0049 

0050 

0051 

0052 

0053 

0054 

0055 

0056 

0057 



ASPB, A.B.I 



BUFFERED TELETYPE DIAGNOSTIC 2116 07/08/68 



STARTING OCTAL ADERESS ■ 10m 

*** 

THE FOLLOWING SWITCH REGISTER SETTINGS 
ARE USED FOR PROGRAM CONTROL 



BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
*** 



■ 1 -» HALT AT BEGIN 

1-1 -> HALT AT ERROR 

2 " 1 -> SLPPRFSS HESS 

3 » 1 -» PERFORM BASIC 

4 " I -» PERFORM PINCH 

5 ■ 1 -» PERFORM PRINT 



*ING OF PROGRAM 
BUFFER 

AGE PRINTOUT 
TEST ROUTINE 
AND READ ROUTINE 
AND KEYBOARD ROUTINE 



MAIN PROGRAM 



99H77 

99977 

00100 

00101 

00102 

00103 

00104 

00105 

00106 

00107 

00110 

00111 

00112 

00113 

00114 

00115 

00116 

00117 

00120 

00121 

00122 

00123 

00124 

00125 

00126 

00127 

00130 

00131 

00132 

00133 

00134 

00135 

00136 



102000 

107700 

102501 

010141 

070303 

014203 

064142 

060143 

0701U 

060144 

070010 

034111 

002004 

006006 

024111 

060407 

070000 

014752 

060123 

064123 

102001 

014145 

060177 

000010 

014304 

014145 

060200 

000010 

015056 

014145 

060201 

000010 



EM 



STA1 



MP1 



ORG 


77B 




WLT 







CLC 


e,c 


INITIALIZE, INTERRUPT 


HA 


l 


PUT TTY 


ANt 


MSK0 


ADDRESS 


fTA 


BTA 


INTO ALL I/O 


JSB 


INIT 


INSTRUCTIONS 


LDI 


M67 


PREPARE 


LDA 


HIS 


TRAP 


8TA 


* + 2 


FOR 


I.DA 


HI 


ILLEGAL 


«TA 


106 


INTERRUPT 


ISi 


•-1 


FROM 


INA 




ANOTHER 


INB 


rSZB 


DEVICE 


JMP 


*-4 




LDA 


IIJ 


PREPARE ILLEGAL TTY 


STA 





INTERRUPT TRAP 


JSB 


EOL 


LINE FEED 


LDA 


• ♦2 


HALT TO CHOOSE 


LD8 


•♦1 


SWITCH REGISTER 


HLT 


1 


OPTIONS 


jse 


MODE 


CHECK SW. REG. 


LDA 


BIT3 


PERFORM 


SLA 




BASIC TEST? 


JSB 


BT 


YES. 


JSB 


MODE 


NO. CHECK SW. REG. 


LDA 


BIT4 


PERFORM 


SLA 




PUNCH AND READ? 


JSB 


PAR 


YES. 


JSB 


MODE 


NO. CHECK SW. REG. 


LDA 


BIT5 


PERFORM 


SLA 




PRINT AND KEYBOARD? 
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0058 00137 

0059 00140 

0060 00141 

0061 00142 

0062 00143 

0063 00144 
0064* 
0065*SNITCH 



015342 
024124 
99*977 
177711 
070010 
102010 



MSK0 
H67 
HIS 
HI 



JSB 
JMP 

oct 

GCT 
ST* 



PAK 

MP A 

77 

1777« 

10B 

10H 



YES. 

NO. 



REGISTER MCNITORED 
CURRENT OPERATING MODE 



0066*FQR 
0067* 

0068 00143 000000 MOEE NOP 

0069 00146 070173 STA 

0070 00147 102501 UA 

0071 00150 P70174 STA 

0072 00151 001300 RAP 

0073 00152 070175 STA 

0074 00153 001300 RAP 
0073 00154 070176 STA 
0076 00155 001300 RAK 
9977 00156 070177 STA 

0078 00157 001300 RAP 

0079 00160 070200 STA 

0080 00161 001300 RAF 

0081 00162 070201 STA 
0062 00163 060174 IDA 
0083 00164 002011 SLA 
0064 00165 024171 JMP 

0085 00166 060202 LDA 

0086 00167 064202 IDS 
0067 00170 024077 JMP 

0088 00171 060173 LDA 

0089 00172 124145 JMP 

0090 00173 000000 ASe OCT 

0091 00174 000000 eUCI OCT 

0092 00175 000000 B IT 1 OCT 

0093 00176 000000 BIT2 OCT 

0094 00177 000000 BIT3 OCT 

0095 00200 000000 BIT4 OCT 

0096 00201 000000 BIT5 OCT 

0097 00202 000100 HAE OCT 
0096* 

0099* 

0100*INITIALIZATION ROCTlNE 

0101* 

0102*TMIS ROUTINE ADDS THE 

0103*ALL I/O INSTRUCTIONS. 

0104* 

0105* 

0106 00203 000000 INIT NOP 

0107 00204 107700 CLC 

0108 00203 014274 JSB 

0109 00206 102300 8F8 

0110 002<97 070340 STA 

0111 00210 070347 STA 

0112 00211 070337 STA 

0113 00212 070401 STA 

0114 00213 070512 STA 



ENTER SUBROUTINE 
STORE A 
EACH BIT 
PROM THE 
SWITCH REGISTER 
IS ROTATED 
INTO THE 
LEAST SIGNIFICANT 
POSITION AND 
STORED IN THE 
STORAGE LOCATION 
BEARING ITS NAME 



AT BEGINNING 
PROGRAM? 



A 80 

1 

BIT0 

BIT1 

BIT2 

BIT3 

BIT4 

BITS 
BIT0 
rRSS 
• + 4 
HAD 
HAD 
END 
ASP. 
MODE. 



fl 



100 



BCFFEREn TELETYPE ADDRESS TO 



HALT 

OF 
NO. 
YES, LOAD A AND B 

WITH 100 
AND HALT 
RESTORE A 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



0,C 

ADIW 



SFSt 

SPS2 

SFS3 

SFS4 

SFS5 



ENTER ROUTINE 

INITIALIZE, INTERRUPT OFF 

PUT TTY ADDRESS 

INTO SFS INSTRUCTIONS 
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0115 
0116 
0117 
0118 
0119 
0120 
0121 
0122 
0123 
0124 
0125 
0126 
0127 
0128 
0129 
0130 
0131 
0132 
0133 
0134 
0135 
0136 
0137 
0138 
0139 
0140 
0141 
0142 
0143 
0144 
0145 
0146 
0147 
0148 
0149 
0150 
0151 
0152 
0153 
0154 
0155 
0156 
0157 
0158 
0159 
0160 
0161 
0162 
0163 
0164 
0165 
0166 
0167 
0168 
0169 
0170 
0171 



00214 
00215 
00216 
00217 
00220 
00221 
00222 
00223 
00224 
00225 
00226 
00227 
00230 
00231 
00232 
00233 
00234 
00235 
00236 
00237 
00240 
00241 
00242 
00243 
00244 
00245 
00246 
00247 
00250 
00251 
00252 
00253 
00254 
00255 
00256 
00257 
00260 
00261 
00262 
00283 
00264 
00265 
00266 
00267 
00270 
00271 
00272 
00273 

♦ADORES 
•THE 8U 
•THE IN 
• 

00274 
00275 
0027* 
00277 



014274 

102200 
070334 
070344 
070354 
070375 
014274 
102600 
070415 
070450 
070471 
070713 
070716 
071357 
014274 
103700 
070417 
070717 
071361 
014274 
106700 
070420 
014274 
102700 
070353 
070500 
014274 
103100 
070343 
014274 
102100 
070366 
014274 
106500 
070451 
070472 
070501 
071122 
071311 
071324 
071332 
071366 
014274 
070000 
070117 
07B364 
070374 
124203 

S INCtUS 
FFERED T 
STRUCTIO 

000000 

160274 
010302 
030303 



jse 

SFC 
ST* 
ST* 
ST* 
ST* 
JSP 
OT* 
ST* 
ST* 
ST* 
ST* 
ST* 
ST* 
JS8 
STC 
ST* 
ST* 
ST* 

jsb 
tic 

ST* 
JSB 
STC 
ST* 
8T* 
.ISB 
CLF 
ST* 
JSP 
STF 
ST* 
JSP 
LIS 
ST* 
ST* 
ST* 
ST* 
ST* 
ST* 
ST* 
ST* 
JSB 
ST* 
ST* 
ST* 
ST* 
J MS 



ADIN 

B 

SFC1 

SFC2 

8FC3 

SFC4 

ADIN 



OT*l 

0TA2 

OTA 3 

0TA4 

0TA5 

CTA6 

ADTN 

0,C 

STCCl 

STCC* 

3TCC* 

*0IN 



CLC1 

ADIN 



STC1 

3TC2 

ADIN 



CLF1 

ADIN 



STF1 

ADIN 



L IR1 

4.IB2 

LIBS 

LIB4 

LIB5 

LIB6 

LIB7 

LIBS 

ADIN 



STA1 

STA2 

STA3 

INIT. 



PUT TTY ADDRESS 

INTO SFC INSTRUCTIONS 



PUT TTY ADDRESS 

INTO OTA INSTRUCTIONS 



PUT TTY ADDRESS 

INTO STCrC INSTRUCTIONS 



PUT TTY ADDRESS 

INTO CLC INSTRUCTION 

PUT TTY ADDRESS 

INTO STC INSTRUCTION 



PUT TTY ADDRESS 

INTO CLF INSTRUCTION 

PUT TTY ADDRESS 

INTO STF INSTRUCTION 

PUT TTY ADDRESS 

INTO LIB INSTRUCTIONS 



PUT TTY ADDRESS 

INTO STA INSTRUCTIONS 



I EXIT ROUTINE 



ICN SU8K0LTINE. 
TY ADDHFSS IS PUT 
N FCLLOMKG JSB AD 



INTO 
IN. 



ADIN 



ID* ADIN 
*NE MSKl 
J OB BTA 



ENTER SUBROUTINE 
BRING I/O INSTRUCTION INTO A 
ADD TTY ADDRESS 
TO INSTRUCTION 
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0172 

0173 

0174 

0175 

0176* 

0177* 

0170* 

0179* 

0180* 

0181* 

0182* 

0183* 

0184 

0185 

0186 

0187 

0188 

0189 

0190 

0191 

0192 

0193 

0194 

0195 

0196 

0197 

0198 

0199 

0200 

0201 

0202 

0203 

0204 

0205 

0206 

0207 

0206 

0209 

0210 

0211 

0212 

0213 

0214 

0215 

0216 

0217 

0216 

0219 

0220 

0221 

0222 

0223 

0224 

0225 

0226 

0227 

0228 



00300 034274 

00301 124274 

00302 177700 

00303 000000 



MSK1 
BTA 



tSI AOIN 

JMP ADIN.I 

OCT 1777«0 

OCT 



EXIT 

SUBROUTINE 

TTY ADDRESS STORA8E 



BASIC TEST ROUTINE 

THE FOLLOWING TESTS 
AND INTERRUPT CIRCUI 



00304 

00305 

00306 

00307 

00310 

00311 

00312 

00313 

00314 

00315 

00316 

00317 

00320 

00321 

00322 

00323 

00324 

00325 

00326 

00327 

00330 

00331 

00332 

00333 

00334 

00335 

00336 

00337 

00340 

00341 

00342 

00343 

00344 

00345 

00346 

00347 

00350 

00351 

00352 

00353 

0035A 

00355 

00356 

00357 

00360 



000000 
107700 
060730 
070727 

060653 

014765 

006400 

074620 

074621 

074622 

074623 

074624 

074625 

074626 

074627 

074630 

074631 

074632 

074633 

074634 

074635 

074636 

074637 

006004 

102200 

024337 

074620 

006004 

102300 

074621 

006004 

103100 

102200 

074622 

006004 

102300 

024352 

074623 

006004 

102700 

102200 

074624 

006004 

102300 

024362 



BT 



SFC1 



SFS1 



CLF1 
SFC2 



SFS2 



STC1 
SFC3 



SFS3 



THE 
TRY 

NOP 
CLC 
LD* 
ST* 

LDA 
JSB 
CLB 
STB 

8T§ 
STB 
8TB 
STB 
STB 
8TB 
STB 
STB 
8TB 
STB 
STB 
STB 
8TB 
8TB 
STB 
INB 
SFC 
JMP 
8TB 
INB 
SFS 
STB 
TNB 

r-Lf 

SFC 

STe 

INB 
SFS 
J MP 
STB 
INB 
STC 
SFC 
STB 
INB 
SFS 
JMP 



FLAG, CONTROL, 



0,C 

SOVN 

OYN 

SI1 

SMPOr 

El 
E2 

E3 
E4 

E5 

E6 

E7 

E10 

Ell 

E12 

E13 

E14 

E15 

E16 

E17 

IA 



• ♦2 
El 



E2 

e 
e 

E3 

e 

**2 
E4 



E5 



*♦? 



INITIALIZE, INTERRUPT OFF 
RESTORE 

OUTPUT CODE 
PRINT FIRST 

BT MESSAGE 
CLEAR 

ERROR 
BUFFER 



INCREMENT ERROR CODE 
FLAG CLEAR? 

NO. 

YES. ERROR 1 

INCREMENT ERROR CODE 
FLAG SETT 

NO. ERROR 2 

YES. 
CLEAR FLAG 
FLAG CLEAR? 

NO. ERROR 3 

YES. 
FLAG SETT 

NO. 

YES. ERROR 4 

SET CONTROL 
FLAG CLEAR? 

NO, ERROR 5 

YES. 
FLAG SET? 

NO. 
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0229 

0230 

0231 

0232 

0233 

0234 

0235 

0236 

0237 

0236 

0239 

0240 

0241 

0242 

0243 

0244 

0245 

0246 

0247 

0248 

0249 

0250 

0251 

0252 

0253* 

0254* 

0255* 

0256 

0257 

0258 

0259 

0260 

0261 

0262 

0263 

0264 

0265 

0266 

0267 

0268 

0269 

0270 

0271 

0272 

0273 

0274 

0275 

0276 

0277 

0278 

0279 

0280 

0281 

0282* 

0283* 

0284* 

0285 



00361 
00362 
00363 
00364 
00365 
00366 
00367 
00370 
00371 
00372 
00373 
00374 
00375 
00376 
00377 
00400 
00401 
00402 
00403 
00404 
00405 
00406 
00407 
00410 



074625 
006004 
060406 
070000 
102100 
102100 
000000 
000000 
074626 
006004 
060407 
070000 
102200 
024400 
074627 
006004 
102300 
074630 
006004 
074410 
024411 
024372 
014533 

000000 



STA2 



STF1 



PI 

STA3 

SFC4 



SFS4 



I J 1 
I EJ 

ERNO 



STB 
IN6 
i DA 
STA 
8TF 
ST* 
KOP 
NOP 
STB 
INS 
IDA 
STA 
SFC 
JMP 
STB 
1MB 
SFS 
STB 
tNB 
ST8 
JMF 
JMF 
JSB 
OCT 



E6 

1 Jl 





E7 

11J 



* + 2 
E10 

e 

Ell 

ERNO 
TOUT 
PI 
ILINT 





YES. ERROR 6 

PREPARE TO TEST 

INTERRUPT SYSTEM 
TURN ON INTERRUPT SYSTEM 
SET FLAO 
WAIT FOR 

INTERRUPT 
NO INTERRUPT - ERROR 7 
INTERRUPT ENTRY 
RENEW ILLEGAL 

INTERRUPT TRAP 
FLAG CLEAR? 
NO. 
YES. ERROR 10 

FLAG SETT 

NO. ERROR 11 
YES. 

STORE ERROR CODE 



ERROR CODE STORAGE 



THE FOLLOWING TESTS THE TIME FOR OUTPUTINQ ONE CHARACTER. 



00411 
00412 
00413 
00414 
00415 
00416 
00417 
00420 
00421 
00422 
00423 
00424 
00425 
00426 
00427 
00430 
00431 
00432 
00433 
00434 
00435 
00436 
00437 
00440 
00441 
00442 



000000 
107700 
102100 
060440 
102600 
064441 
103700 
106700 
014511 
024424 
024426 
064410 
074631 
034410 
000000 
064442 
014511 
024435 
064410 
074632 
034410 
000000 
024443 
100000 
142000 
176700 



TOIT 



0TA1 

STCC1 
CLC1 



ONN 

TCC1 

T0C2 



KOF 
CLC 
9TF 
LDA 
OTA 
l-D« 
8TC 
CLC 

jse 
jmp 

JMP 
LDB 
• T8 
fSl 
NOP 
LDB 
JSB 
JMP 
LDB 
0TB 

tsi 

NOP 
JMP 
OCT 
OCT 
OCT 



0,C 

e 

ONN 



T0C1 

0,C 

f 

TOS 

• ♦2 
**3 
ERNO 
E12 
ERNO 

T0C2 
TOS 

♦ ♦3 
ERNO 
E13 
ERNO 

DT 

100000 
1420<»0 
1767»0 



INITIALIZE, INTERRUPT OFF 

INTERRUPT ON 

PUT INTO OUTPUT, NO 

PRINT, NO PUNCH MODE 
CHECK 

LOWER 
TIME 
FLAG SET? 
YES. DATA 
NO. 
ERROR 12 



LIMIT 



CLOCK TOO FAST 



INCREMENT ERPOR 
CHECK UPPER 

TIME LIMIT 
FLAG SET? 
YES. TIMING OK 
NO, DATA CLOCK 

ERROR 13 
INCREMENT ERROR 



CODE 



TOO SLOW 
CODE 



OUTPUT, NO PRINT, NO PUNCH 
TIMEOUT CONSTANT 1 
TIMEOUT CONSTANT 2 



THE FOLLOWING TESTS THE EIGHT BIT DATA BUFFER, 
00443 000000 DT NOP 
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CURwn 
MSKg 


1 

* + 3 
ERNO 
Ei4 
CURHn 
,SZA 
P2 

ERNO 
CET 
377 
200 





FOLLOWING TESTS THE CLOCK ENABLE FLIP-FLOP 



0286 00444 107700 CLC 

§287 00445 002400 CLA 

0288 00446 070465 P2 8TA 

0289 00447 010463 AND 

0290 00450 102600 0TA2 CTA 
§291 00451 106560 LIG1 Lie 

0292 00452 050001 CPA 

0293 00453 024456 JMP 

0294 00454 060410 LDA 

0295 00455 070633 STA 

0296 00456 060465 LDA 

0297 00457 002006 INA 

0298 00460 024446 JMF 

0299 00461 034410 !S1 

0300 00462 024467 JMP 

0301 00463 000377 M9K2 OCT 

0302 00464 000200 MSK3 OCT 

0303 00465 000000 CUPWD CCT 

0304 00466 000000 NBE OCT 
0305* 

0306*TH£ 
0307* 

0308 00467 107700 CET CLC 

0309 00470 060440 LDA 

0310 00471 102600 0TA3 OTA 

0311 00472 106500 IIP2 LIB 

0312 00473 006021 SSB 

0313 00474 024477 .IMP 

0314 00475 060410 LDA 

0315 00476 070634 STA 

0316 00477 034410 !S2 

0317 00500 102700 STC2 8TC 

0318 00501 106500 LIB3 Lie 

0319 00502 006020 SSB 

0320 00503 024506 JMF 

0321 00504 060410 LDA 

0322 00505 070635 STA 

0323 00506 107700 CLC 

0324 00507 014522 JSS 

0325 00510 024545 JMF 
0326* 

0327*FLAG TIMEOUT SUBROUTINE 

0326* 

B329*TIME0UT CONSTANT 

0330*IF "FLAG" BEFORE 



INITIALISE, INTERRUPT OFF 

OUTPUT THE 
CURRENT 
WORD 

INPUT ■ OUTPUT ? 

YES. ' 

NO. ERROR 14 

INCREMENT 

CURRENT WORD 

INCREMENT ERROR CODE 



0,C INITIALIZE, INTERRUPT OFF 

ONN PUT BUFFER INTO "OUTPUT, NO 
PRINT, NO PUNCH" STATE 

FLIP-FLOP 
,RSS SET? 

♦♦3 NO. 

ERNC YES. ERROR 15 
E15 

ERNO INCREMENT ERROR CODE 

SET FLIP-FLOP 

FLIP-FLOP 

SETT 

**3 YES. 

ERNO NO. ERROR 16 
E16 

0,C INITIALIZE, INTERRUPT OFF 

EBH HALT AT ERROR BUFFER? 

POUT NO. 



0331*EXIT 

0332* 

0333 



TO TOS «• 1 



IN B 
TIMEOUT 
ONE IT 



0334 
0335 
0336 
0337 
0338 
0339 
0340 
0341 
0342* 



00511 
00512 
00513 
00514 
00515 
00516 
00517 
00520 
00521 



000000 
102309 
024515 
124511 
006006 
024512 
034511 
000000 
124511 



TOS 
SFS5 



, EXIT TO TOS. IF NOT, 
ERATIriN » 6.4 MICROSEC. 

NOP ENTER SUBROUTINE 

SFS FLAG SET? 

JMP **2 

JMP TOS,T YES. EXIT THROUGH TOS 

INB,SZB NO, TIMEOUT YET? 

JMP SFS5 NO. REPEAT 

ISi TOS YES. EXIT 

*0P THROUGH 

JMP TOS,r TOS + 1 
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0343*ERROR 
0344* 



BUFFER HALT SUBROLTINE 



0345 00522 

0346 00523 

0347 00524 

0348 00525 

0349 00526 

0350 00527 

0351 00530 

0352 00531 

0353 00532 
0354* 

0355MLLEGAL 
0356* 

0357*FOR AM 
0358* 



000000 

070532 
014145 
060175 
000010 
014614 
060532 
124522 
000000 



EBt- 



AS1 



8T* 
JS8 
IDA 
SLA 
JS8 
LDA 
JMF 
OCT 



AS1 

HQDE 
BITt 

POF 
AS1 

EBH, 



ENTER SUBROUTINE 
5T0RE A 

CHECK SW. REG. 
HALT AT 

ERROR BUFFER? 
YES 

no/ restore a 
exit subroutine 
temporary storage 



INTERRUPT SUBROUTINE 



ILLEGAL TTT INTERRUPT, THE PROGRAM ADDRESS IS SAVED. 



00533 
00534 
00535 
00536 
00537 
00540 
00541 
00542 
00543 
00544 



000000 

070543 
060533 
070637 
060544 
070636 
060543 
124533 

000000 
000017 



ILINT 



AS2 
IE 



KQF 
8TA 
LDA 
STA 
LDA 
ITA 
LDA 
JMF 
OCT 
OCT 



AS2 
*-2 

IA 

IE 

E17 

AS2 

ILINT, I 



17 



ENTER SUBROUTINE 

STORE A 

STORE PROGRAM ADDRESS 

STORE 

ERROR 17 
RESTORE A 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



TS CUT THE RESULTS OF THE BASIC TEST. 

TO PSINT OiiT, THE PROGRAM 
Mn6 CF THE ERROR BUFFER. 
MEKCRY" WILI SHOW WHICH ERRORS OCCURED, 



0359 

0360 

0361 

0362 

0363 

0364 

0365 

0366 

0367 

0368 

0369* 

0370*TH£ FOLLOWING PPIh 

0371*IN CASE OF FAILURE 

0372*HALTS AT THE BEGIN 

0373*PRESSING "DISPLAY 

0374* 

0375 00545 000000 POLT HOP 

0376 00546 107700 CLC f C INITULIZEr INTERRUPT OFF 

0377 00547 006400 CLi 

0378 00550 014511 JS8 TOS FLAG SET? 

0379 00551 024553 JMF *+2 YES. 

0380 00552 014614 JSB POF NO. HALT AT ERROR BUFFER 

0381 00553 060665 LDA SC2 PREPARE TO 

0382 00554 070666 STA M16 PRINT OUT 

0383 00555 060667 LDA SI3 ERROR CODES 

0384 00556 070557 STA P4 

0385 00557 064620 P4 LD8 El LOAD B WITH 

0386 00560 034557 IS1 *-i ERROR STORAGE 

0387 00561 006002 SZB ZERO? 

0388 00562 024566 JMF *+4 NO. 

0389 00563 034666 IS! M16 YES. PARTIALLY DONE? 

0390 00564 024557 JMF P4 NO. 

0391 00565 024574 JMF P5 YES. CHECK INTERRUPT ERRORS 

0392 00566 060670 LDA E PRINT 

0393 00567 014706 JSB OYNA OUT 

0394 00570 014733 JSB POUT9 ERROR 

0395 00571 01475? JSB EOL CODE 

0396 00572 014522 JSB EBH HALT AT ERROR BUFFER? 

0397 00573 024563 JMF *-10H NO. 

0398 00574 064636 P5 LDB E17 E17 ■ 0? 

0399 00575 0060P3 SZB,RS9 
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0400 


00576 


024610 




JMP 


P6 


rES. 




0401 


00577 


060670 




LDA 


E 


NO. 




0402 


00600 


014706 




JSB 


OVNA 


PRINT OUT 




0403 


00601 


014733 




jse 


POUT9 


ERROR CODE 




0404 


00602 


060705 




LDA 


814 


AND 




0405 


*0603 


015003 




JSB 


MPO 


PR08RAM ADDRESS 




0406 


00604 


060637 




ID* 


IA 


WHEN ERROR 




0407 


00605 


015026 




JSB 


OPA 


OCCURRED 




0408 


00606 


014752 




JSB 


EOl 


LINE FEED 




0409 


00607 


014752 




jse 


EOL 


LINE FEED 




0410 


00610 


060664 


P6 


LDA 


SI2 


PRINT SECOND 




0411 


00611 


014765 




JSB 


SMPOr. 


BT MESSAGE 




0412 


00612 


014522 




JSB 


EBH 


HALT AT ERROR BUFFER? 




0413 


00613 


124304 




JMP 


BT,I 


NO, EXIT ROUTINE 




0414 


00614 


000000 


POP 


NOP 








0415 


00615 


060614 




t-DA 


*-l 


PUT PROSRAM ADDRSSS 




0416 


00616 


064614 




LDB 


*-2 


FOR PRINT FAILURE 




0417 


00617 


102055 




HLT 


55B 


INTO A AND B 




0418* 
















0419* 


ERROR BUFFER 












0420* 
















0421 


09620 


000000 


El 


OCT 


P 


SFC TRUE AFTER CLC 


0,C 


0422 


00621 


000000 


E2 


OCT 





SFS FALSE AFTER CLC 


0,C 


0423 


00622 


000000 


E3 


OCT 





SFC FALSE AFTER CLF 


TTY 


0424 


00623 


000000 


E4 


OCT 





SFS TRUE AFTER CLF 


TTY 


0425 


00624 


000000 


E5 


OCT 





SFC FALSE AFTER CLF 


TTY AND STC 


0426 


00625 


000000 


E6 


OCT 





SFS TRUE AFTER CLF 


TTY AND STC 


0427 


00626 


000000 


E7 


OCT 





NO INTERRUPT AFTER STC TTY,STF 


0428 


00627 


000000 


E1C 


OCT 





SFC TRUE AFTER INTERRUPT 


0429 


00630 


000000 


Ell 


OCT 





SFS FALSE AFTER INTERRUPT 


0430 


00631 


000000 


E 12 


OCT 





DATA CLOCK ON TTY BOARD TOO FAST 


0431 


00632 


000000 


613 


OCT 





DATA CLOCK ON TTY BOARD TOO SLOW 


0432 


00633 


000000 


E14 


OCT 





DATA BUFFER ERROR 




0433 


00634 


000000 


E15 


OCT 





CLOCK ENABLE FLIP-FLOP 


' SET 


0434 


00635 


000000 


E16 


OCT 


e 


CLOCK ENABLE FLIP-FLOP 


> NOT SET 


0435 


00636 


000000 


E17 


OCT 





ILLEGAL INTERRUPT FRO* 


1 TELETYPE 


0436 


00637 


000000 


!A 


OCT 





PROGRAM ADDRESS AT TIME OF E17 


0437 


00640 


177777 




OCT 


177777 


ERROR BUFFER TERMINAITON 


0438 


00641 


024124 




JMP 


MPi 


RETURN TO MAIN PROGRAM 


I 


0439* 
















0440 


00642 
00643 
00644 
00645 
00646 
00647 
00650 
00651 


041105 
043511 
047040 
041101 
051511 
041440 
052105 
051524 


BTM 


ASC 


8, BEGIN 


BASIC TEST 




0441 


00652 


000000 




OCT 









0442 


00653 


060642 


811 


IDA 


BTHl 






0443 


00654 


042516 


8Tf2 


ASC 


7,ENn BASIC TEST 






00655 


042040 














00656 


041101 














00657 


0515U 














00660 


041440 














00661 


052105 














00662 


051524 
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0444 
044S 
0446 
0447 

0448 
0449 

0450 



0451 

0452 

0453* 

0454* 

0455* 

0456 

0457 

0453 

0459 

0460 

0461 

0462 

0463 

0464 

0465 

0466 

0467 

0466 

0469 

0470 

0471 

0472 

0473 

0474 

0475 

0476 

0477* 

0476* 

0479* 

0460 

0481 

0462 

0463 

0484 

0485 

0486 

0487 

0488 

0469 

0490 



00663 
00664 
00665 
00666 
00667 
00670 
00671 
00672 
00673 
00674 
00675 
00676 
00677 
00700 
00701 
00702 
00703 
00704 
00705 



000000 
060654 
177762 
000000 
064620 
000305 
020040 
020120 
051117 
043522 
040515 
020101 
042104 
051105 
051523 
020075 
020040 
000000 
060671 



SIS 
SC2 

wte 

813 
E 

PRAD 



OCT 
LDA 
OCT 
OCT 
LDB 
OCT 
ASC 



BTM2 

1777*2 



El 

305 

II, PROGRAM 



ADDRESS - 



S!4 



OCT 
IDA PRAD 



PRINT LEAST SIGNIFICANT 6 BITS OF A. 



00706 
00707 
00710 
00711 
00712 
00713 
00714 
00715 
00716 
00717 
00720 
00721 
00722 
00723 
00724 
00725 
00726 
00727 
00730 
00731 
00732 



000000 
107700 
070731 
074732 
060727 
102600 
060731 
010463 
102600 
103700 
006400 
014511 
024724 
014614 
060731 
064732 
124706 
120000 
120000 
000000 
000000 



CYM 



0TA4 



CTA5 
STCC2 



OYK 
SOYN 
AS3 
BS1 



KOF 
CLC 
STA 
STB 
LDA 
OTA 
IDA 

ANt 

OTA 
8TC 
CLC 
JSB 
JMP 
JSB 
LDA 
LDB 
JMP 
OCT 
OCT 
OCT 
OCT 



0,C 

AS3 

BS1 

OYN 



AS3 

MSK2 



0,C 

TOS 
• ♦2 

POP 
AS3 
BS1 

OYNA, 
120000 
1200H0 






I 



PRINT OUT TWO OCTAL NUMBERS 



00733 

00734 
00735 
00736 
00737 
00740 
00741 
00742 
00743 
00744 
00745 



000000 
060001 
001100 
001100 

001100 

010751 

030750 
014706 

060001 
010751 
030750 



P0LT2 



ftOF 
LDA 
ARS 
ARS 
AR8 
ANt 
10R 
JSB 
LDA 
ANt 
!0« 



ENTER SUBROUTINE 

INITIALIZE, INTERRUPT OFF 

STORE A 

STORE B 

PUT BUFFER INTO OUTPUT 

AND PRINT MODE 
RESTORE A 
OUTPUT LEAST 

SIGNIFICANT 6 
BITS OF A 

FLAG SET? 

NO, HALT AT ERROR BUFFER 

YES. RESTORE A 

RESTORE B 

EXIT SUBROUTINE 

OUTPUT, PRINT, NO PUNCH 

TEMPORARY STORAGE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 
OUTPUT 
FIRST 
NUMBER 



M8K5 

M8K4 

OYNA 

1 

MSK5 

MSK4 



OUTPUT 
SECOND 
NUMBER 
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0491 

0492 

0493 

0494 

0495* 

0496* 

0497* 

0496 

0499 

0500 

0501 

0502 

0503 

0504 

0505 

0506 

0507 

0508 

0509* 

0510* 

0511* 

0512 

0513 

0514 

0515 

0516 

0517 

0518 

0519 

0520 

0521 

0522 

0523 

0524 

0525 

0526* 

0527* 

0528* 

0629 

0530 

0531 

0532 

0533 

0534 

0535 

0536 

0537* 

0536* 

0539* 

0540* 

0541 

0542 

0543 

0544 

0545 

0546 

0547 



00746 014706 

00747 124733 

00750 000260 

00751 000007 



HSK 
MSK 



JSB OYNA 

JMF P0UT9,I 

OCT 260 

OCT 7 



EXIT SUBROUTINE 



END OF LINE SUBROLTINF 



00752 
00753 
00754 
00755 
00756 
00757 
00760 
00761 
00762 
00763 
00764 



000000 
070762 
060763 
014706 
060764 
014706 
060762 
124752 

000000 

000215 

000212 



EOL 



ASA 

CR 

LP 



NOP 
• TA 
LDA 
JSB 
LDA 
JSB 
LDA 
JMF 
OCT 
OCT 

ncT 



AS4 

CR 

OYNA 

LF 

OYNA 

A 84 

EOL,! 



215 

212 



ENTER SUBROUTINE 
STORE A 
CARRIAGE 

RETURN 
LINE 

FEED 
RESTORE A 
EXIT SUBROUIINE 
TEMPORARY STORAGE 



SUPPRESS MESSAGE FRINTQLT CHE^k SUBROUTINE 



00765 
00766 
00767 
00770 
00771 
00772 
00773 
00774 
00775 
00776 
00777 
01000 
01001 
01002 



000000 
071002 
014145 
060176 
002011 
024775 
061002 
124765 
061002 
015003 
014752 
014752 
124765 
000000 



SMFOC 



NOP 

8TA ASS 
JSB MODE 
LDA BIT2 
8LA f RSS 
JMP **3 



Ase 



LDA 
JMP 
LDA 
JSB 
JSB 
JSB 
JMP 
CCT 



AS5 

SMPOr,! 

A 85 

MPO 

EOL 

EOL 

SMP0r,I 



ME8SA0E PRINTOUT SUBROUTINE 



01003 
01004 
01005 
01006 
01007 
01010 
01011 
01012 



000000 
071005 
060000 
035005 
002003 
125003 
015013 
025005 



MPC 



NOP 

8TA *M 
LDA 

ISI *-l! 
8ZA f RSS 
JMP MPCJrt 
JSB PACO 

JMF *-5 



ENTER SUBROUTINE 
STORE A 

CHECK SW. REG. 
SUPPRESS EXCESS 

PRINTING? 
NO. 

YES. RESTORE A 
EXIT SUBROUTINE 
RESTORE A 
PRINT MESSAGE 
LINE FEED 
LINE FEED 
EXIT SUBROUTINE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 
LOAD A WORD 



WORD - P? 
YES. EXIT 

NO. PRINT 
REPEAT FOR 



SUBROUTINE 
THE WORD 
NEXT WORD 



PACKED ASCII CHARA 
MOST SIGNIFICANT * 



CTER OUTPUT SUBROUTINE 
BITS OF A REGISTER PRINTED FIRST. 



01013 
01014 

01015 
01016 
01017 
01020 
01021 



000000 
071025 
001700 
001700 
010463 
014706 
061025 



PACO 



NOP 
STA 
ALF 
ALF 
ANE 
JSB 
LDA 



AS6 



MSK2 
OYNA 
A 36 



SUBROUTINE 

A 



ENTER 
STORE 
PRINT 
FIRST 

CHARACTER 

PRINT 
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0548 01022 

0549 01023 

0550 01024 

0551 01025 
0552* 

0553*OCTAL 
0554* 



010453 
014706 
125013 
000000 



asc 



PRINTOUT OF A 



0555 
0556 
0557 

0558 

0559 

0560 

0561 

0562 

0563 

0564 

0565 

0566 

0567 

0568 

0569* 

0570*NEXT 

0571* 

0572 



01026 
01027 
01030 
01031 
01032 
01033 
01034 
01035 
01036 
01037 
01040 
01041 
01042 
01043 



000000 
001200 
071042 
011043 
030750 
014706 
015044 
015044 
015044 
015044 
015044 
125026 
000000 
000001 



OPA 



AS? 

MSK6 



ANC 
JSi 
JMP 
OCT 



KOF 
RAL 
8TA 
ANC 
100 
JSI 

jsb 

JSI 
JSI 
JSB 
JSB 
JMP 
OCT 
OCT 



H8K2 
OYNA 
PACO. 




AS7 

KSK6 

HSK4 

OYNA 

NXT 

NXT 

NXT 

NXT 

NXT 

OPA, I 



1 



OCTAL CHARACTER OUTPUT 



01044 
01045 
01046 
01047 
01050 
01051 
01052 
01053 
01054 
01055 



000000 
061042 
001200 
001200 
001200 
071042 
010751 
030750 
014706 
125044 



NXT 



0573 

0574 

0575 

0576 

0577 

0578 

0579 

0580 

0581 

0562* 

0583* 

0584* 

0565*PUNCM AND READ RQlTlNF 

0586* 

8587*TESTS TAPE PUNCH AND TAPE REARER 

0588*BY 0UTPUT1N6 ALL COMBINATIONS OF 

0589*EI8HT BITS AND READING THEM BACK, 

0590* 



NOP 
LDA 
RAL 
RAL 
RAL 
«TA 
ANF 
TOR 
JSB 
JMF 



AS7 



AS7 

MSK5 
MSK4 
OYNA 
NXT,? 



0591 

0592 
0593 
0594 
0595 
0596 
0597 
0598 
0599 
0600 
0601 
0602 
0603 
0604 



01056 
01057 
01060 
01061 
01062 
01063 
01064 
01065 
01066 
01067 
01070 
01071 
01072 
01073 



000000 
107700 
006400 
014511 
025064 
014614 
061250 
014765 
061070 
065070 
102002 
061143 
070727 
015264 



PAP 



*0P 
CLC 
CLB 
JSB 
JMP 
JSB 
LDA 
JSB 
LDA 
LDB 
HLT 
LDA 
STA 
JSfi 



e,c 

TOS 

• ♦2 

POF 

817 

SMPOn 

•*2 

**1 

2 

ONY 

OYN 

ZEROS 



SECOND 

CHARACTER 
EXIT SUBROUTINE 
TEMPORARY ST0RA8E 



ENTER SUBROUTINE 

STORE A 
PRINT 
FIRST 
NUMBER 
PRINT 
NEXT 
FIVE 

NUMBERS 

EXIT SUBROUTINE 
TEMPORARY STORAGE 



ENTER SUBROUTINE 
PREPARE 
THE 
NEXT 

NUMBER 
FOR 

OUTPUTING 

OUTPUT 

EXIT SUBROUTINE 



ENTER ROUTINE 

INITIALIZE, INTERRUPT OFF 

FLAG SET? 

YES. 

NO. HALT AT ERROR BUFFER 

PRINT FIRST 

PAR MESSAGE 
HALT TO 

TURN ON 
PUNCH 
PREPARE TO 

PUNCH TAPE 
PUNCH LEADER 
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0605 

0606 

0607 

0606 

0609 

0610 

0611 

0612 

0613 

0614 

0615 

0616 

0617 

0618 

0619 

0620 

0621 

0622 

0623 

0624 

0625 

0626 

0627 

0628 

0629 

0630 

0631 

0632 

0633 

0634 

0635 

0636 

0637 

0638 

0639 

0640 

0641 

0642 

0643 

0644 

0645 

0646 

0647 

0648 

0649 

0650* 

0651* 

0652* 

0653 

0654 

0655 

0656 

0657 

0656 

0659 

0660 

0661 



01«74 
01*575 
01076 
01077 
01100 

ei 101 

01102 

01103 

01104 

01105 

01106 

01107 

01110 

01111 

01112 

01113 

01114 

01115 

01116 

01117 

01120 

01121 

01122 

01123 

01124 

01125 

01126 

01127 

01130 

01131 

01132 

01133 

01134 

01135 

01136 

01137 

01140 

01141 

01142 

01143 

01144 

01145 

01146 

01147 

01150 



003400 

010463 

014706 

002400 

015274 

015274 

061144 

070727 

060762 

015274 

015274 

015264 

015264 

015264 

015151 

061115 

065115 

102003 

061150 

070727 

002400 

014706 

106500 

006903 

025121 

015305 

061145 

070727 

061341 

015305 

061146 

070727 

061341 

015305 
061147 
070727 
061341 
015305 
025161 
110000 
130000 
160000 
150000 
170000 
140000 



LIB4 



CYY 
IYN 

INY 
IYY 

INN 



CCA 
ANE 
JSI 
CLA 

jse 

JSff 

LDA 
STA 
IDA 
.J SB 

Jse 

JSB 

jse 

JSP 

jse 

IDA 
LDB 
*LT 
LDA 
«TA 
CLA 
JSfi 

Lie 

8ZB 

JMF 

jse 

LDA 
»TA 

LDA 
JSB 
LDA 
STA 
LDA 
JSB 
LDA 
STA 
LDA 
JSB 
JHP 
OCT 
OCT 
OCT 
OCT 
OCT 
OCT 



HSK2 
QVNA 

.64CM 

,64C« 

OYY 

OYN 

A 34 

.64C* 

.64CH 

ZEROS 

ZEROS 

ZEROS 

PARE 

• + 2 

••►1 

3 

INN 

OVN 

OVNA 

,R38 
#«3 
R64CW 
IVN 
OVN 
ASH 
R64C« 
INY 
OVN 
ASH 
R64CH 
IYY 
OYN 
ASH 
R64CH 
P7 

H00M0 
1300A0 
1600*0 
1500*0 
1700M0 

1400010 



PUNCH AND READ EXIT SUBROUTINE 



01151 
01152 
01153 
01154 
01155 
01156 
01157 
01160 
01161 



000000 
071167 
014145 
060200 
002011 
025161 
06H67 
125151 
060730 



PARE 



P7 



NOP 

STA ASS 
JSB MODE 
LDA BIT4 
*LA,R3S 
JMP **3 
LDA ASS 
JMP PARE. 
LDA SOYN 



OUTPUT ALL ONES 
AS A BEGINNING 
INDICATOR 
PUNCH 
ALL 

COMBINATIONS 

OP EIGHT 

BITS 



PUNCH 
TRAILER 

EXIT ROUTINE? 
NO. HALT TO 

LOAD TAPE 

INTO READER 
PREPARE TO 

READ 
TAPE 
READ A 

CHARACTER 
CHARACTER • 0? 
YES. READ NEXT 
NO. READ FIRST 



CHARACTER 
BLOCK 



READ SECOND BLOCK 



READ THIRD BLOCK 



READ FOURTH BLOCK 

EXIT ROUTINE 

OUTPUT, NO PRINT, PUNCH 

OUTPUT, PRINT,PUNCH 

INPUT, PRINT, NO PUNCH 

INPUT, NO PRINT, PUNCH 

INPUT f PRINT, PUNCH 

INPUT, NO PRINT, NO PUNCH 



ENTER SUBROUTINE 
STORE A 

CHECK SW. REG. 
EXIT THIS 

ROUTINE? 
YES. 

NO. RESTORE A 
EXIT SUBROUTINE 
RESTORE 
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0662 

0663 

0664 

0665 

0666 

0667 

0666* 

0669* 

0670* 

0671 

0672 

0673 

0674 

0675 

0676 

0677 

0678 

0679 

0660 

0661 

0682 

0663 

0684 

0685 

0666 

0667 

0686 

0689 

0690 

0691 

0692 

0693 



01162 
01163 
01164 
01165 
01166 
01167 



070727 
014762 
061263 
014765 
125056 
000000 



ASfi 



ST* 
JSI 
(■04 
JS8 
JMP 
OCT 



OYN 

EOL 

S18 

SMPOn 

PAR, I 





PRINT OUT ERRORS ROUTINE 



0694 
0695 
0696 



0697 
0698 
0699 



0700 



01170 

01171 

01172 

01173 

01174 

01175 

01176 

01177 

01200 

01201 

01202 

01203 

01204 

01205 

01206 

01207 

01210 

01211 

01212 

01213 

01214 

01215 

01216 

01217 

01220 

01221 

01222 

01223 

01224 

01225 

01226 

01227 

01230 

01231 

01232 

01233 

01234 

01235 

01236 

01237 

01240 

01241 

01242 

01243 

01244 

01246 

01246 

01247 



000000 
071214 
060727 
071215 
060730 
070727 
014752 
061224 
015003 
061214 
015026 
061234 
015003 
060001 
015026 
014752 
061215 
070727 
061214 
125170 
000000 
000000 
047525 
052120 
052524 
020075 
020040 
000000 
061216 
020040 
020040 
044516 
050125 
052040 
036440 
000000 
061225 
041105 
043511 
047040 
050125 
047103 
044040 
040516 
042040 
051105 
040504 
000000 



PCI 



ASS 
A310 

00 



SIS 
01 



OUTPUT CODE 
LINE FEED 
PRINT SECOND 

PAR MESSAGE 
EXIT ROUTINE 
TEMPORARY STORAGE 



NOP 
ST* 
ID* 
8T* 
LDA 
ST* 
JSB 
ID* 
JSB 
LD* 
JSB 
LD* 
JSS 
LD* 
JSB 
JSB 
LD* 
8T* 
LD* 
JMP 
OCT 
CCT 
ASC 



OCT 
LD* 
ASC 



OCT 
SI6 LD* 

PARM1 *SC 



AS9 

OYN 

AS10 

SOYN 

OYN 

EOL 

SIS 

MPO 

AS9 

OPA 

SI6 

MPO 

1 

OPA 

EOL 

A810 

OYN 

AS9 

FOE, 





5, OUTPUT 



1 



ENTER 
STORE 
SAVE 
STATE 



SUBROUTINE 

A 



LINE FEED 

PRINT "OUTPUT •■ 

RESTORE A 

PRINT OCTAL NUMBER 

PRINT "INPUT -" 

PRINT OCTAL 

NUMBER 
LINE FEED 
RESTORE 

STATE 
RESTORE A 
EXIT SUBROUTINE 
TEMPORARY STORAGE 
TEMPORARY STORAGE 



00 
6, 



INPUT 



01 
10,BFQIN 



PUNCM AND READ 



OCT 
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0701 
0702 



0703 

0704 

0705* 

0706* 

0707* 

070S 

0709 

0710 

0711 

0712 

0713 

0714 

0715 

0716* 

0717* 

0718* 

0719 

0720 

0721 

0722 

0723 

0724 

0725 

0726 

0727 

0728* 

0729* 

0730* 

0731 

0732 

0733 

0734 

0735 

0736 

0737 

0738 

0739 

0740 

0741 

0742 

0743 

0744 

0745 

0746 

0747 

0748 

0749 



01250 
01251 
01252 
01253 
01254 
01255 
01256 
01257 
01260 
01261 
01262 
01263 



061235 
042516 
042040 
050125 
047103 
044040 
040516 
042040 
051105 
040504 
000000 
061251 



SI7 

PARM2 



ID* 
ASC 



PARM« 
9,ENn 



PUNCH AND READ 



sje 

OUTPUT BLANK TAPE 



OCT 
LD* 





PARM3 



01264 000000 ZEROS NOP 

01265 002400 CL* 

01266 065273 L D§ 8C3 

01267 014706 JSi OYNA 

01270 006006 INS,SZB 

01271 025267 JMP *-2 

01272 125264 JMP ZEROS, I 

01273 177740 8C3 OCT 177740 



ENTER SUBROUTINE 



OUTPUT ZERO 

32 ZEROS? 

NO, 

YES. EXIT SUBROUTINE 



INCREMENT AND OUTPUT A REG. t* TIMES 



01274 000000 .64CH NOP 

01275 065304 LDR SC4 

01276 014706 JSB OYNA 

01277 002004 INA 

01300 006006 INB,8Z« 

01301 025276 JMP *-3 

01302 014752 JSi EOl. 

01303 125274 JMP ,64CM,I 

01304 177700 SC4 OCT 1777«0 

READ AND CHECK 64 CHARACTERS 



01305 
01306 
01307 
01310 
01311 
01312 
01313 
01314 
01315 
01316 
01317 
01320 
01321 
01322 
01323 
01324 
01325 
01326 
01327 



000000 
065304 
075340 
014706 
1065B0 
015151 
050001 
025316 
015170 
002004 
035340 
025310 
071341 
060763 
014706 
106500 
050001 
025330 
015170 



R64CH 



P8 

LIB5 



LIB6 



NOP 

LDfi 
STB 

jsb 

LIS 

JSB 
CP* 
JMP 
JSB 
IN* 
ISI 
JMP 
8TA 

ID* 
JSB 

LIB 
CPA 
JMP 
JS8 



8C4 

M64 

OYNA 



PARE 

1 

**2 

POE 

M64 

P8 

ASU 

CR 

OYNA 



1 

• ♦2 

POE 



ENTER SUBROUTINE 

RESET COUNTER 

OUTPUT A 

INCREMENT OUTPUT WORT) 

64 CHARACTERS? 

NO. 

YES. 

EXIT ROUTINE 



ENTER SUBROUTINE 
RESET 

CHARACTER COUNTER 
READ A 

CHARACTER 
EXIT ROUTINE? 
NO, ERROR? 
NO. 

YES. PRINT OUT ERROR 
INCREMENT REFERENCE 
64 CHARACTERS? 
NO. 

YES. STORE A 
CHECK FOR 

CARRIAGE 
RETURN 
ERROR? 
NO, 
YES, PRINT OUT ERROR 
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8750 

§751 

0752 

§753 

0754 

0755 

0756 

0757 

0758 

0759 

0760* 

0761* 

0762* 

0763* 

0764* 

0765 

0766 

0767 

0766 

0769 

9779 

0771 

0772 

0773 

0774 

0775 

0776 

0777 

§778 

0779 

0780 

0781 

0782 

0783 

0784 

0785 

0786 

0767 

0788 

0789* 

0790* 

0791* 

0792 

0793 

0794 

0795 

0796 

0797 

0798 

0799 

0600 

0601 

0802 

0603 

0804 



01330 
01331 
01332 
01333 
01334 
01335 
01336 
01337 
01340 
01341 



060764 
014706 
106500 
050001 
025336 
015170 
061341 
125305 
177700 
000000 



L1B7 



M64 
ASH 



IDA 
JSB 
LIB 
CPA 
JMP 
JSB 
LDA 
JMP 
OCT 
OCT 



IF 

OYNA 



1 

•♦2 

POE 

ash 

R64CM,I 
1777«0 





PRINT AND KEVBOARE ROUTINE 



01342 

01343 

01344 

01345 

01346 

01347 

01350 

01351 

01352 

01353 

01354 

01355 

01356 

01357 

01360 

01361 

01362 

01363 

01364 

01365 

01366 

01367 

01370 

01371 



000000 

107700 

060730 

070727 

061423 

014765 

015464 

015464 

014752 

015372 

061446 

014765 

061150 

102600 

015372 

103700 

006400 

0145U 

025366 

025360 

106500 

060001 

014706 

025356 



PAK 



P9 

0TA6 
PU 
STCC3 



LIBS 



NOP 

etc 

LDA 

8TA 

LDA 

JSB 

JSB 

JSB 

JSB 

JSB 

LDA 

JSB 

LDA 

OTA 

JSB 

8TC 

OLB 

JSB 

JMP 

JMP 

L IB 

LDA 

JSB 

JMP 



•>C 

SOYN 

OYN 

SI9 

SMPOn 

PRALt 

PRAU 

EOL 

PAKE 

3110 

SMPOn 

INN 



PAKE 

0,C 

TOS 
• ♦2 
PI0 


1 

CYNA 
P9 



PRINT AND KEYBOARE EXIT 



01372 
01373 
01374 
01375 
01376 
01377 
01400 
01401 
01402 
01403 
01404 
01405 
01406 
01407 
01410 



000000 

071214 

014145 

060201 

002011 

025402 

061214 

125372 

014752 

061463 

014765 

125342 

041105 

0435U 

047040 



PAKE 



MOP 
6TA A39 

JSB MODE 
LDA BITS 
SLA,RSS 
JMP **3 



PAKM1 



LDA 
JMP 
JSB 
LDA 
JSB 
JMP 
ASC 



I 



AS9 

PAKE 

EOL 

Sill 

SMPOfi 

PAK, t 

12,BFQIN 



CHECK FOR 
LINE 
FEED 
ERROR? 
NO. 

YES. PRINT OUT ERROR 
RESTORE A 
EXIT SUBROUTINE 

TEMPORARY STORAGE 



CHARACTERS 
CHARACTERS 



ENTER ROUTINE 

INITIALIZE, INTERRUPT OFF 

PREPARE 

TO PRINT 
PRINT FIRST 

PAK MESSAGE 
PRINT 64 ASCII 
PRINT 64 ASCII 
LINE PEED 
EXIT ROUTINE? 
NO. PRINT SECOND 

PAK MESSAGE 
PREPARE TO READ 

IN FROM KEYBOARD 
EXIT ROUTINE? 
NO. WAIT 

FOR INPUT 
ANY INPUT? 
YES. 
NO. 

LOAD DATA INTO B 
PUT B INTO A 
OUTPUT A 
READ NEXT CHARACTER 



ENTER SUBROUTINE 
STORE A 

CHECK SW. REG. 
EXIT THIS 

ROUTINE? 
YES. 

NO. RESTORE A 
EXIT SUBROUTINE 

PRINT THIRD 

PAK MESSAGE 
EXIT ROUTINE 
PRINT AND KEYBOARD 
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0809 
0806 
0807 



0808 
0809 
0810 



01411 
01412 
01413 
01414 
01415 
£1416 
01417 
01420 
01421 
01422 
01423 
01424 
01425 
01426 
01427 
01430 
01431 
01432 
01433 
01434 
01435 
01436 
01437 
01440 
01441 
01442 
01443 
01444 
01445 
01446 
01447 
01450 
0U51 
01452 
01453 
01454 
01455 
01456 
01457 
01460 
01461 
01462 
01463 



050122 

044516 
052040 
040516 
042040 
045505 
054502 
047501 
051104 
000000 
061406 
052523 
042440 
045505 
054502 
047501 
051104 
020123 
046117 
053514 
054440 
024065 
020103 
044123 
027057 
051505 
041456 
024440 
000000 
061424 
042516 
042040 
050122 
044516 
052040 
040516 
042040 
045505 
054502 
047501 
0SU04 
000000 
061447 



SIS 

PAKM2 



8110 

PAKM3 



OCT 
IDA 
ASC 





PAKH« 

17,U»E 



KEYBOARD SLOWLY (5 CHS. /SEC.) 



OCT 
LDA 
ASC 





PAKM9 

HrEND 



PRINT AND KEYBOARD 



0811 01462 000000 OCT 

0612 01463 061447 Sill LDA PAKH* 

0613* 

0814*PRINT ALL CHARACTERS SUBROUTINE 

0815* 

0616 01464 000000 PRALL NOP 

0817 01466 061472 LDA SC5 

0618 01466 015474 JS8 ,32C* 

0819 01467 061473 IDA SC6 

0820 01470 015474 JSB .32CM 

0821 01471 125464 JMP PKALi , 

0822 01472 000300 806 OCT 330 
0623 01473 000240 SCC OCT 240 
0824* 

0825*PRINT 32 CHARACTERS SLBROUT'IN* 
0826* 



ENTER SUBROUTINE 
PRINT FIRST 

LINE OF CHARACTERS 
PRINT SECOND 

LINE OF CHARACTERS 
EXIT SUBROUTINE 
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0827 


01474 


000000 


.32CH 


NOP 




0828 


01475 


075506 




STB 


BS2 


0829 


01476 


065273 




LDB 


SC3 


0830 


01477 


014706 




JSi 


OYNA 


0831 


01508 


002004 




IN* 




0832 


01501 


006006 




INI, 


rSZB 


0833 


01502 


025477 




JMP 


*-3 


0834 


01533 


014752 




JSB 


EOL 


0635 


01504 


065506 




LOB 


BS2 


0836 


01505 


125474 




JMP 


.32CH,! 


0837 


01506 


000000 


BS2 


CCT 





0838 








ENt 




** NO ERRORS* 









ENTER SUBROUTINE 

STORE B 

RESET COUNTER 

PRINT A 

INCREMENT A 

32 CHARACTERS? 

NO. PRINT NEXT CHARACTER 

YES. LINE FEED 

RESTORE B 

EXIT SUBROUTINE 

TEMPORARY STORAGE 



